Select Case aktuellesBild
Case 0
PictureBox1.Image = My.Resources._2
aktuellesBild = 1
Case 1
PictureBox1.Image = My.Resources._1
aktuellesBild = 0
End Select
Ist das VB6 oder was? += und so sachen funktionieren doch in vb gar nicht oder täusch mich.
Auch das du deine Variable gleich vorbelegst:
Dim aktuellesBild As Integer = 0
das geht so viel ich weiss auh nicht.
Oder programmierst du VB.NET? dann ist es was anderes....
|