这段代码怎么老是缺少对象？

我添加了时间控件，为什么还是缺少对象啊？

这是代码：

'Picture1, Timer1
Private Sub Form_Load()
Timer1.Interval = 200
End Sub
Private Sub Timer1_Timer()
If Picture1.Left > Me.Width Then
Picture1.Left = -Picture1.Width + 100
Else
Picture1.Left = Picture1.Left + 50
End If
End Sub