Varför fungerar detta:

Private Sub Class_Initialize()
Dim MciCtl As Object
Set MciCtl = CreateObject("MCI.MMcontrol")
Set MciCtl = Nothing
End Sub

...men inte detta:

Private Sub Class_Initialize()
Dim tmr As Object
Set tmr = CreateObject("VB.Timer")
Set tmr = Nothing
End Sub

?

Multi Media kontrollen kan funger dels som kontrol och dels som objekt. Ett annat exempel på kontroller eller objekt som klarar det är Microsoft script kontroll. Timern däremot är enbart en kontroll. Den kräver ett fönster. Så du kan inte skapa den på det sättet.