Programmieren - alles kontrollieren 4.938 Themen, 20.667 Beiträge

Warum funktioniert dieses kleine Programm nicht ?

Public Class frm0212
Dim instance As Timer
Dim value As Integer


Private Sub cmdStop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdStop.Click
timAnzeige.Enabled = False
End Sub

Private Sub timAnzeige_tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles timAnzeige.Click
timAnzeige.Text &= "x"
End Sub

Private Sub cmdStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdStart.Click
timAnzeige.Enabled = True
value = 1000
instance.Interval = value
End Sub

Private Sub frm0212_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
End Class

Wer weiß Rat ?