ผมลองทำตัวหนังสือวิ่งจากตัวอย่างใน accboard
Private Sub Form_Load()
DoCmd.Maximize
strTxt = Space(55) & "Hello Wellcome..."
Me.TimerInterval = 200
End Sub

Private Sub Form_Timer()
Dim x
'On Error GoTo Form_Timer_Err
x = Left(strTxt, 1)
strTxt = Right(strTxt, Len(strTxt) - 1)
strTxt = strTxt + x
lblMarq.Caption = Left(strTxt, 55)

Form_Timer_Exit:
   
Exit Sub
'Form_Timer_Err:
'MsgBox Err.Description, , "Form_Timer_Err"
'Resume Form_Timer_Exit

End Sub
มี Bug ขึ้นว่า Compile Error Valiable Not Defined และขึ้นแถบไฮไลท์ที่ strTxt
ที่บรรทัดนี้ครับ
strTxt = Space(55) & "Hello Wellcome..."
มีท่านใดเคยทำบ้างไหมครับ
ถ้าจะให้วิ่งเหมือนในเวปบอร์ดนี้ต้องปรับแก้โค้ดยังไงครับ ขอคำแนะนำด้วยครับ