Ich habe mal aus Langeweile mit meinem bisherigen Wissen einen LoL Jungle Timer geschrieben, welcher auch fast ohne Probleme funktioniert.
Wenn ich einen Button klicke wird die Zeit heruntergezählt und wenn die Zeit 0 erreicht verschwindet das Label (wie auch gewollt). Wenn ich nun wieder den gleiche Button klicke, dann passiert nichts, aber ich möchte, dass wenn ich den Button noch mal klicke die Zeit wieder heruntergezählt wird (da wird glaub ich eine Schleife verwendet).
Code:
Code:
Public Class Form1
'Red Buff-Red team
Private RBRT As Integer = 300
'Blue Buff-Red team
Private BBRT As Integer = 300
'Red Buff-Blue team
Private RBBT As Integer = 300
'Blue Buff-Blue team
Private BBBT As Integer = 300
'Dragon
Private D As Integer = 360
'Baron
Private B As Integer = 420
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.TopMost = True
End Sub
Private Sub timAnzeige1_Tick(sender As Object, e As EventArgs) Handles timAnzeige1.Tick
RBRT -= 1
lblRB1.Text = CStr(RBRT)
If RBRT = 0 Then
lblRB1.Hide()
End If
End Sub
Private Sub cmdRedBuffRT_Click(sender As Object, e As EventArgs) Handles cmdRedBuffRT.Click
timAnzeige1.Start()
End Sub






