Hallo,
wieso funktioniert dieser Code nicht?
LG Lambo
wieso funktioniert dieser Code nicht?
Quellcode
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
- If Form1.Label2.Text > 100 And Form1.Label4.Text > 100 And Form1.Label6.Text > 100 Then
- Form1.Label2.Text -= 100 And Form1.Label4.Text = -100 And Form1.Label2.Text = -100 And Label10.Text = "Stufe 2" And Label18.Text = "200/200/200" And Button2.Text = "Ausbau auf Stufe 3"
- End If
- If Not Form1.Label2.Text > 100 And Form1.Label4.Text > 100 And Form1.Label6.Text > 100 Then MessageBox.Show("XXXXXXX")
- End Sub
- End Class
LG Lambo