/
Forside
/
Teknologi
/
Udvikling
/
VB/Basic
/
Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
VB/Basic
#
Navn
Point
1
berpox
2425
2
pete
1435
3
CADmageren
1251
4
gibson
1230
5
Phylock
887
6
gandalf
836
7
AntonV
790
8
strarup
750
9
Benjamin...
700
10
tom.kise
610
Tid´s kontrol på en class fil
Fra :
Jens
Dato :
25-03-02 01:02
Hvordan for man en tid´s kontrol til at virke i en class fil
Mit bud var :
Dim WithEvents Tid As Timer
Sub Main()
Tid.Interval = 1
End Sub
Private Sub Tid_Timer()
if time = "00:23:00" then
msgbox "Hej"
end if
End Sub
Harald Staff (
25-03-2002
)
Kommentar
Fra :
Harald Staff
Dato :
25-03-02 09:59
Timeren virker nok -det er evalueringen din som er rusten.
Enten
if time = timevalue("00:23:00") then
eller
if time = timeserial(0,23,0) then
HTH. Beste hilsen Harald
"Jens" <til@infojens.dk> skrev i melding
news:3c9e68d7$0$72008$edfadb0f@dspool01.news.tele.dk...
> Hvordan for man en tid´s kontrol til at virke i en class fil
>
> Mit bud var :
>
> Dim WithEvents Tid As Timer
>
> Sub Main()
>
> Tid.Interval = 1
>
> End Sub
>
> Private Sub Tid_Timer()
>
> if time = "00:23:00" then
> msgbox "Hej"
> end if
>
> End Sub
>
>
>
Tomas Christiansen (
25-03-2002
)
Kommentar
Fra :
Tomas Christiansen
Dato :
25-03-02 23:14
Jens skrev:
> Hvordan for man en tid´s kontrol til at virke i en class fil
>
> Mit bud var :
>
> Dim WithEvents Tid As Timer
Svaret er: Det gør man ikke.
Timer kontrollen virker kun hvis den lægges på en form!
Alternativt kan man eksempelvis kigge på SetTimer/KillTimer
API-kaldene, men det er unægtelig lettere at bruger timer-kontrollen!
En sidste mulighed er at lave en ActiveX exe-fil, som kører i sin egen
tråd, og sender et event hver sekund, men det er temmelig besværligt!
-------
Tomas
Jens (
26-03-2002
)
Kommentar
Fra :
Jens
Dato :
26-03-02 00:29
Tak for svar...
"Jens" <til@infojens.dk> wrote in message
news:3c9e68d7$0$72008$edfadb0f@dspool01.news.tele.dk...
> Hvordan for man en tid´s kontrol til at virke i en class fil
>
> Mit bud var :
>
> Dim WithEvents Tid As Timer
>
> Sub Main()
>
> Tid.Interval = 1
>
> End Sub
>
> Private Sub Tid_Timer()
>
> if time = "00:23:00" then
> msgbox "Hej"
> end if
>
> End Sub
>
>
>
Søg
Alle emner
Teknologi
Udvikling
VB/Basic
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177557
Tips :
31968
Nyheder :
719565
Indlæg :
6408885
Brugere :
218888
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.