Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

argh.. was mache ich falsch?
Autor: Bernd
Datum: 28.08.02 21:40
hi, irgendetwas mache ich falsch oder übersehe etwas. wenn ich den Code Private myTime As Long Private Sub Form_Load() myTime = 10 Timer1.Interval = 1000 Timer1.Enabled = True Text1.Text = CStr(myTime) End Sub Private Sub Timer1_Timer() myTime = myTime - 1 Text1.Text = CStr(myTime) If myTime < 1 Then Timer1.Enabled = False End Sub alleine laufen lasse funktioniert er. Wenn ich das ganze in mein Programm einbaue funktioniert es nicht. Der Timer fängt nicht an zu laufen Auszug aus meinem Programm --------------------------------- Public Function warten(fest, plusx, ab) Dim px As Integer Randomize -Timer px = Int(plusx * Rnd + 1) myTime = fest + px End Function ----------------------------------- Private Sub Command1_Click() beenden End Sub ----------------------------------- Private Sub Timer1_Timer() Timer1.Enabled = True myTime = myTime - 1 Label8.Caption = myTime If myTime < 1 Then Timer1.Enabled = False End Sub ---------------------------------- Private Sub Form_Load() Dim i As Integer myTime = 0 Timer1.Interval = 1000 Timer1.Enabled = False Form1.Show anzahlaufrufe Label2.Caption = "Programm wird " & x & " mal aufgerufen werden" For i = 1 To x **Anweisung** **Anweisung** Label5.Caption = "und wurde bisher " & i & " mal aufgerufen" warten 0, 177, 1 Timer1.Enabled = True <-- hier passiert weiter nix fensterschließen warten 372, 112, 2 Next i End End Sub Wo liegt mein Fehler?? Bin am Verzweifeln cu Bernd

argh.. was mache ich falsch?	80	Bernd	28.08.02 21:40
Re: argh.. was mache ich falsch?	45	Marcus W	28.08.02 23:46
auf dem Schlauch steh!?	43	Bernd	29.08.02 08:14
Re: auf dem Schlauch steh!?	44	Marcus	29.08.02 09:21
Re: auf dem Schlauch steh!?	41	Bernd	29.08.02 17:00
Marcus, bist du noch da?	40	Bernd	29.08.02 22:14

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen