Fehler bei VB2008

v0ltagezz · 09/15/2010, 19:21

Hey ich wolte heute ein Programm schreiben, aber nun kommt eine Meldung das ich einen Fehler habe. So jetzt wollte ich fragen wo der Fehler liegt hier der code:

Code:

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Convert.ToDouble(TextBox1.Text)
        Convert.ToDouble(TextBox2.Text)
        Convert.ToDouble(TextBox3.Text)
        Convert.ToDouble(TextBox4.Text)
        Zahl1 = TextBox1.Text
        Zahl2 = TextBox2.Text
        Zahl3 = TextBox3.Text
        Ergebnis = TextBox4.Text
        Randomize()
        TextBox1.Text = Int(Rnd() * 10)
        TextBox2.Text = Int(Rnd() * 10)
        TextBox3.Text = Int(Rnd() * 10)
    End Sub
End Class

Natürlich habe ich auch Zahl1 usw. Speicherplatz mit hilfe der Dim Anweisung zugeteilt.
Also ich hoffe ihr könnt mir helfen.
MFG
v0ltagezz

Madd Eye · 09/15/2010, 20:35

Code:

        Zahl1 = Convert.ToDouble(TextBox1.Text)
        Zahl2 = Convert.ToDouble(TextBox2.Text)
        Zahl3 = Convert.ToDouble(TextBox3.Text)
        Zahl4 = Convert.ToDouble(TextBox4.Text)
        Randomize()
        TextBox1.Text = Int(Rnd() * 10)
        TextBox2.Text = Int(Rnd() * 10)
        TextBox3.Text = Int(Rnd() * 10)

Convert.ToDouble gibt den Wert zurück und Convertiert den Inhalt nicht dauerhaft!

v0ltagezz · 09/15/2010, 21:34

ok und wie mache ich das es dauerhaft ist?

Madd Eye · 09/15/2010, 22:15

Geht nicht da in einer TextBox immer ein String vorhanden ist
Du kannt es in einen Anderen Variablen Typen umwandeln und in einer Variable speichern aber Der inhalt bleibt ein String und kann man auch nichts dran ändern

Warum willst du eigentlich dauerthaft den inhalt der Textbox in nen Double convertieren? Oo machs doch so wie ich oben geschrieben hab

v0ltagezz · 09/15/2010, 22:48

ich habs gemacht wie du es geschrieben hast aber irgentwie krieg ich das nich auf die Reihe sry ^^, ich mache VB erst seit einem Monat...
Hier zum Programm:
Also ich will ein PRogramm das automatisch 3 zahlen erzeugt welche zwischen 0-10 liegen, nun soll das Programm rechnen Zahl1 + Zahl2 - Zahl3 das ergebnis soll dann in der TextBox4 angezeigt werden...

Jeoni · 09/15/2010, 23:09

Ich nutze für solche umwandlugen immer das hier:

Code:

        Zahl1 = CDbl(TextBox1.Text)
        Zahl2 = CDbl(TextBox2.Text)
        Zahl3 = CDbl(TextBox3.Text)
        Zahl4 = CDbl(TextBox4.Text)

Kannst aber auch anstatt "CDbl" "Convert.ToDouble" nehmen. Das erste ist nur eine Kurzform. Viel Spaß noch

MfG
Jeoni