Follow along with the video below to see how to install our site as a web app on your home screen.
Anmerkung: This feature currently requires accessing the site using the built-in Safari browser.
Public Class Hauptfenster
Private Ergebnis As Double ' Hier wird das Ergebnis der Rechnung gespeichert
Private letzteOperation As String ' Hier die letzte Rechenoperation, die der Benutzer angeklickt hat
Private aktuelleZahl As Double? ' und hier die Zahl, die unmittelbar davor eingegeben worden ist
'...
End Class
Und das was ich hab versucht zu erklärenAnscheinend hab ich fast nochmal dasselbe geschrieben wie oben...
aktuelleZahl = decimal.Parse(textBox1.Text);
Public Class Hauptfenster
Private Ergebnis As Double ' Hier wird das Ergebnis der Rechnung gespeichert
Private letzteOperation As String ' Hier die letzte Rechenoperation, die der Benutzer angeklickt hat
Private aktuelleZahl As Double? ' und hier die Zahl, die unmittelbar davor eingegeben worden ist
Private Sub ZahlKlick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ...
If Not aktuelleZahl.HasValue Then tbZahl.Text = ""
tbZahl.Text += DirectCast(sender, Button).Text
aktuelleZahl = Double.Parse(tbZahl.Text)
End Sub
Private Sub OperationKlick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ...
If aktuelleZahl.HasValue Then
Select Case letzteOperation
Case "+"
Ergebnis += aktuelleZahl
Case "-"
Ergebnis -= aktuelleZahl
Case "*"
Ergebnis *= aktuelleZahl
Case "/"
Ergebnis /= aktuelleZahl
Case Else
Ergebnis = tbZahl.Text
End Select
aktuelleZahl = Nothing
End If
tbZahl.Text = Ergebnis
letzteOperation = DirectCast(sender, Button).Text
End Sub
End Class