08-12-2022, 09:14 PM
Well, none of the local experts noticed that the result in Visual Basic was wrong?
That is corrext:
![[Image: Runden-Prog-Fehler2022-08-12-225439.jpg]](https://i.ibb.co/Fz8FXbn/Runden-Prog-Fehler2022-08-12-225439.jpg)
Give me a gun!
![Rolleyes Rolleyes](https://staging.qb64phoenix.com/images/smilies/rolleyes.png)
That is corrext:
Code: (Select All)
Private Sub cmdCommand_Click()
Dim Zahl1, Zahl2, Ergebnis As Double
'Die Zahlen müssen einzeln aus den Textfeldern gelesen werden
'Das "Ergebnis = Val(txtZahl1.Text + txtZahl2.Text)" geht nicht
Zahl1 = Val(txtZahl1.Text)
Zahl2 = Val(txtZahl2.Text)
Ergebnis = Zahl1 + Zahl2
txtErgebnis.Text = Format$(Ergebnis, "###.##") 'Punkt! Englische Version.
End Sub
![[Image: Runden-Prog-Fehler2022-08-12-225439.jpg]](https://i.ibb.co/Fz8FXbn/Runden-Prog-Fehler2022-08-12-225439.jpg)
Give me a gun!
![Tongue Tongue](https://staging.qb64phoenix.com/images/smilies/tongue.png)