Hallo zusammen,
ich schreibe gerade ein kleine Rechenübungsprogramm für unsere Kinder. Soweit funktioniert alles sehr gut. Lediglich die Statistik bekomme ich einfach nicht hin. Der Zähler zählt falsch.
Bsp. Wenn ich 6 Richtige Antworten habe und dann eine Aufgabe falsch beantworte, steht in den Label für falsche Antworten eine 7.
Könnt ihr mir bitte helfen?
Einer meiner Versuche sieht bisher so aus: (in VB 2010)
Vielen Dank
PS, bin absoluter Anfänger
ich schreibe gerade ein kleine Rechenübungsprogramm für unsere Kinder. Soweit funktioniert alles sehr gut. Lediglich die Statistik bekomme ich einfach nicht hin. Der Zähler zählt falsch.
Bsp. Wenn ich 6 Richtige Antworten habe und dann eine Aufgabe falsch beantworte, steht in den Label für falsche Antworten eine 7.
Könnt ihr mir bitte helfen?
Einer meiner Versuche sieht bisher so aus: (in VB 2010)
VB.NET-Quellcode
- Public Class Form1
- Dim RZahl As Integer = 0
- Dim FZahl As Integer = 0
- Private Sub Button2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
- RZahl += 1
- FZahl += 1
- Ergebnis = 1000 - Zahl1
- If TextBox1.Text = "" Then
- MsgBox("Es muss eine Zahl eingegeben werden!")
- TextBox1.Focus()
- End If
- If TextBox1.Text = Ergebnis Then
- Label10.Text = RZahl
- MsgBox("Richtig, gut gemacht " & CheckBox6.Text & "!")
- TextBox1.Clear()
- Button1.PerformClick()
- End If
- If TextBox1.Text <> Ergebnis Then
- MsgBox("Schade, leider falsch " & CheckBox6.Text & ". Versuche es erneut.")
- Label11.Text = FZahl
- TextBox1.Clear()
- TextBox1.Focus()
- End If
- End Sub
- End Class
Vielen Dank
PS, bin absoluter Anfänger
Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „Emma-En“ ()