Hallo!
Anscheinend bin ich echt zu blöd dazu!
Folgendes Problem.
Ich will das Dezimalwerte in meinen Textboxen Addiert werden können - folgenden Code verwende ich hierfür:
[highlight=vbnet]Dim x As Double
If Double.TryParse(TextBox1.Text, x) Then
TextBox2.Text = (x + TextBox3.Text)
End If[/highlight]
Das geht auch sehr gut! Aber wie schreibe ich den Code um wenn ich mehr Textboxen habe?
Wie zum Beispiel muss folgender Code umgeschrieben werden damit dezimalstellen erkannt werden?
[highlight=vbnet]TextBox64.Text = Val(TextBox50.Text) + Val(TextBox51.Text) + Val(TextBox52.Text) + Val(TextBox53.Text) + Val(TextBox54.Text) + Val(TextBox55.Text) + Val(TextBox56.Text)
[/highlight]
Danke im vorraus für eure Hilfe
Gruß Jürgen
Anscheinend bin ich echt zu blöd dazu!
Folgendes Problem.
Ich will das Dezimalwerte in meinen Textboxen Addiert werden können - folgenden Code verwende ich hierfür:
[highlight=vbnet]Dim x As Double
If Double.TryParse(TextBox1.Text, x) Then
TextBox2.Text = (x + TextBox3.Text)
End If[/highlight]
Das geht auch sehr gut! Aber wie schreibe ich den Code um wenn ich mehr Textboxen habe?
Wie zum Beispiel muss folgender Code umgeschrieben werden damit dezimalstellen erkannt werden?
[highlight=vbnet]TextBox64.Text = Val(TextBox50.Text) + Val(TextBox51.Text) + Val(TextBox52.Text) + Val(TextBox53.Text) + Val(TextBox54.Text) + Val(TextBox55.Text) + Val(TextBox56.Text)
[/highlight]
Danke im vorraus für eure Hilfe
Gruß Jürgen
Comment