HEY! Habe diesen Code:
Eigentlich alles logisch... Allerdings habe ich 5 Befehle die mit diesen Timer zu steuern!
Also müsste der Code So lauten:
Und so weiter...
Das ganze geht aber nicht!
Wo ist der vdmte Fehler?
VB.NET-Quellcode
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Timer1.Interval = 1000
- End Sub
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'Bei einem Klick auf Button1 wird der Timer gestartet'
- Timer1.Start()
- End Sub
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
- If ProgressBar1.Value = 100 Then
- 'Handlung'
- Timer1.Stop()
- Else
- ProgressBar1.Value = ProgressBar1.Value + 10
- End If
- End Sub
Eigentlich alles logisch... Allerdings habe ich 5 Befehle die mit diesen Timer zu steuern!
Also müsste der Code So lauten:
VB.NET-Quellcode
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Timer1.Interval = 1000
- End Sub
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'Bei einem Klick auf Button1 wird der Timer gestartet'
- Timer1.Start()
- End Sub
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
- If ProgressBar1.Value = 100 Then
- 'Handlung'
- Timer1.Stop()
- Else
- ProgressBar1.Value = ProgressBar1.Value + 10
- End If
- If ProgressBar1.Value = 80 Then
- 'Handlung'
- Else
- ProgressBar1.Value = ProgressBar1.Value + 10
- End If
- End Sub
Und so weiter...
Das ganze geht aber nicht!
Wo ist der vdmte Fehler?