Newsticker / Lyavis "dutter" ikke, hvad er der galt ?

Hej Folkens !

har den kode, der er sakset fra youtube ,o)

Men den virker ikke ;o(
Hvad går der galt ?

Jeg får en Run-time error 5
Invalid procedure call or argument
-----------------------------

Option Compare Database
Public Message As String

Private Sub Form_Open(Cancel As Integer)
'Dim Message As String
Message = "Dette er den ny lysavis til databasen * Dette er den ny lysavis til databasen * "
End Sub

Private Sub Form_Timer()
txtmarquee = Message
Dim firstCharacter As String
firstCharacter = Left(txtmarquee, 1)
Message = Mid$(Message, 2, Len(Message) - 1)
End Sub
------------------------------------------------------


mvh martens