Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

pomoćć

[es] :: Visual Basic 6 :: pomoćć

[ Pregleda: 5223 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Ivan007
Ivan Samardžić

Član broj: 12665
Poruke: 11
*.net.hinet.hr



Profil

icon pomoćć02.09.2003. u 17:36 - pre 222 meseci
pravim sat/alarm

label1 = sat
text1

ako je u text1 napisano "19:00:00" a sat je na "19:00:00"
kako da mi se otvori nova forma

Ivan
 
Odgovor na temu

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI,
USA / Software Engineer
Ann Arbor, MI, USA

Član broj: 6598
Poruke: 2065
*.yubc.net

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz


Profil

icon Re: pomoćć02.09.2003. u 17:51 - pre 222 meseci
treba da stavis na formu Timer kontrolu. Podesi joj Interval Property na 1000 (milisekunde su u pitanju), i dodaj ovaj kod

Code:

Private Sub Timer1_Timer()
Dim AlarmTime As Date
    
    If IsDate(txtText.Text) Then
        AlarmTime = CDate(txtText.Text)
    Else
        Exit Sub
    End If
    
    If DateDiff("s", AlarmTime, Time()) = 0 Then
        Form2.Show
    End If
End Sub


Ovaj kod ce ti svake sekunde proveravati, da li je vreme iz textboxa jednako sistemskom i ako jeste prikazati formu.

 
Odgovor na temu

[es] :: Visual Basic 6 :: pomoćć

[ Pregleda: 5223 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.