Jag tänkte försöka använda en activX-timer utan att klistra in den grafiskt i formen. Därför måste jag skapa objektet med kod. Jag har börjat så här men ej fått det att fungera:

Public objTimer As Timer

Private Sub LaddaTimer()

Set objTimer = CreateObject(Timer)
objTimer.Enabled = True
objTimer.Intervall = 1000

End Sub

Private Sub objTimer()
Msgbox "timern rullar"
End Sub

Jag har säker blandat både kåddar och morötter nu...
Någon som kan hjälpa mig att skapa en ActivX-timer med kod?

/Frasse

Hej,

Felet ligger nog i hur du använder CreateObject. Första argumentet till den funktionen ska vara en sträng med activex-komponentens ProgID tror jag. Exempel :

set obExcel = CreateObject("Excel.Application")

Tyvärr vet jag inte vilket ProgID timern har, men det borde gå att få fram genom att söka i systemregistret t ex. Tyvärr har jag inte VB6 på den maskinen jag sitter vid nu, så jag kan inte kolla det...

Kan någon annan bistå med Timerns ProdID? Plz

/Per Hultqvist