Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > .NET Languages
You last visited: Today at 22:04

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



VB. Countdown reseten

Discussion on VB. Countdown reseten within the .NET Languages forum part of the Coders Den category.

Reply
 
Old   #1
 
KingwondA's Avatar
 
elite*gold: 312
Join Date: May 2013
Posts: 449
Received Thanks: 45
VB. Countdown reseten

Ich bin noch Anfänger in Visual Basic und bräuchte Eure Hilfe.
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
KingwondA is offline  
Old 01/09/2014, 08:31   #2

 
Syc's Avatar
 
elite*gold: 666
Join Date: Apr 2011
Posts: 5,810
Received Thanks: 2,418
Setz doch beim Klick auf den Button den Wert des Timers auf den ursprünglichen Wert.
Wo ist da das Problem?
Syc is offline  
Old 01/09/2014, 12:30   #3
 
tolio's Avatar
 
elite*gold: 2932
The Black Market: 169/1/0
Join Date: Oct 2009
Posts: 6,966
Received Thanks: 1,097
Code:
    Private Sub cmdRedBuffRT_Click(sender As Object, e As EventArgs) Handles cmdRedBuffRT.Click
        timAnzeige1.Stop()
        RBRT = 300
        timAnzeige1.Start()
    End Sub
tolio is offline  
Old 01/09/2014, 17:52   #4
 
KingwondA's Avatar
 
elite*gold: 312
Join Date: May 2013
Posts: 449
Received Thanks: 45
Quote:
Originally Posted by tolio View Post
Code:
    Private Sub cmdRedBuffRT_Click(sender As Object, e As EventArgs) Handles cmdRedBuffRT.Click
        timAnzeige1.Stop()
        RBRT = 300
        timAnzeige1.Start()
    End Sub
So geht es auch Ich habe nun einen umständlicheren Weg genommen.
So lange ich am Ziel ankomme ist es noch unwichtig wie ich es Programmiere.^^
KingwondA is offline  
Old 01/09/2014, 18:05   #5


 
Requi's Avatar
 
elite*gold: 3570
The Black Market: 244/0/0
Join Date: Dec 2012
Posts: 13,044
Received Thanks: 8,252
Quote:
Originally Posted by KingwondA View Post
So lange ich am Ziel ankomme ist es noch unwichtig wie ich es Programmiere.^^
Eine kleine Sache, die mich lolkop in meiner Anfängerzeit vor 1 Jahr mal gelehrt hat.

Code:
For i = 0 To 10000000
Threading.Thread.Sleep(100000)
Next
Console.WriteLine("a")
"dieser code sendet auch irgendwann mal ein 'a'... das heist aber nicht, das man zum senden von 'a' IMMER diesen code nutzen sollte..."
Requi is offline  
Old 01/10/2014, 00:24   #6
 
Zero-_-Cool's Avatar
 
elite*gold: 0
Join Date: Jan 2014
Posts: 5
Received Thanks: 1
Ich kann dir auch empfehlen, HotKeys zu setzen.. dann brauchst du nicht jedesmal wennu ingame bist auf nen blöden Button klicken. Meines Wissens nach braucht man den Mauszeiger in LoL eigentlich immer im Spiel selbst an der richtigen Stelle - und nicht auf irgendeiner deiner Form(s). Btw: Wie is eig. der Plural von 'Form'?.
Zero-_-Cool is offline  
Reply


Similar Threads Similar Threads
Server reseten
07/15/2013 - Metin2 Private Server - 4 Replies
Tag, hab mal eine Frage. Und zwar..: Wie kann man sein Server reseten, so dass alle Chars gelöscht sind + die Item. Ohne das man jeden einzelnen Char löscht.. ? LG
[COD:BO] LvL reseten.
04/24/2011 - Call of Duty - 10 Replies
Hi com. ich hab mir eben ein bo steam acc gekauft und wollt fragen ob ich das lvl iwie reseten kann weil ich das lvl gerne ohne hilfe spielen will. danke.
Pc Reseten , NEED HELP!!!!
04/21/2011 - Technical Support - 4 Replies
Hey leute brauche dringend hilfe virus hatte fast alle datein gefressen konnte ihn noch grade so löschen und jetze will ich Pc reseten oder ähnliches damit er wie neu instaliert ist geht das iwe ? weil habe meine Xp cd verlegt und nichts anderes da :( Pls need dringen Help MGF Darkzorn



All times are GMT +1. The time now is 22:04.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.