Hey Leute,
ich komme nicht weiter, vieleicht könnt ihr mit etwas helfen.
Hier mal mein Bild zum ersten einblick:
Also ich möchte das wenn man Links auf den Button klickt das oben Rechts bei Produktion. Das was darunter ist automatisch erscheint. Quasi ist es zu beginn unsichtbar.
Jetzt kommts noch. Da wo Produktionsname (Label) steht, soll dann XY stehen was vom Button kommt z.b. "Wartezeit Kündigung KL" in der mitte habe ich eine Pb 1 - 100 % und rechts daneben einen Countdown, der dann 30 Minuten runterzählt, und wenn er bei 0 ist, soll er etwas ausführen (in ein Label YX Summe gutschreiben) und das ganze von oben rechts wieder entfernen oder unsichtbar machen.
PS: es handelt sich um ein Spiel
Ich hoffe ihr könnt mir Helfen
EDIT:
Das hab ich bis jetzt hinbekommen:
Wenn ich jetzt auf den Button klicke dann Zählt der countdown runter (10 Sek) aber die PBar zählt bis 10 % hoch und bleibt stehen
Der name wird auch angezeit
ich komme nicht weiter, vieleicht könnt ihr mit etwas helfen.
Hier mal mein Bild zum ersten einblick:
Also ich möchte das wenn man Links auf den Button klickt das oben Rechts bei Produktion. Das was darunter ist automatisch erscheint. Quasi ist es zu beginn unsichtbar.
Jetzt kommts noch. Da wo Produktionsname (Label) steht, soll dann XY stehen was vom Button kommt z.b. "Wartezeit Kündigung KL" in der mitte habe ich eine Pb 1 - 100 % und rechts daneben einen Countdown, der dann 30 Minuten runterzählt, und wenn er bei 0 ist, soll er etwas ausführen (in ein Label YX Summe gutschreiben) und das ganze von oben rechts wieder entfernen oder unsichtbar machen.
PS: es handelt sich um ein Spiel
Ich hoffe ihr könnt mir Helfen
EDIT:
Das hab ich bis jetzt hinbekommen:
VB.NET-Quellcode
- Private Sub Zeit3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- Set_Countdown(New TimeSpan(0, 0, 10))
- End Sub
- Sub Set_Countdown(ByVal Span As TimeSpan)
- Bau_Countdown.Stop()
- RestlicheZeit = Span
- lbl_Countdown_Label.Text = RestlicheZeit.ToString()
- End Sub
- Private Sub Bau_Countdown_Tick(sender As Object, e As EventArgs) Handles Bau_Countdown.Tick
- RestlicheZeit -= New TimeSpan(0, 0, 1)
- Bauname.Text = "Kündigungsfrist KL"
- lbl_Countdown_Label.Text = RestlicheZeit.ToString()
- Pbar1.Value += 1
- If Pbar1.Value = 100 Then
- Pbar1.Value = 0
- End If
- If RestlicheZeit = New TimeSpan(0) Then
- Bau_Countdown.Stop()
- End If
- End Sub
Wenn ich jetzt auf den Button klicke dann Zählt der countdown runter (10 Sek) aber die PBar zählt bis 10 % hoch und bleibt stehen
Der name wird auch angezeit
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „VBHunter“ ()