这个代码有什么问题啊？？

Question

Private Sub Command2_Click()
If Command1.Left >= Form1.Width-Command1.Width
   Command1.Left = 0
End If
Command1.Left = Command1 + 150
End SubPrivate Sub Command3_Click()
End
End Sub我可是照着输入的啊，可是总不能运行，说什么语法错误，高手帮忙，我和书上的对了又对，都是一样的啊，为什么我总不能成功运行？

Answer 1

Command1.Left = Command1 + 150这里错了，或许是书上印错了

Answer 2

Command1.Left = Command1.Left + 150
吧！
不然怎么会对？

Answer 3

Private Sub Command2_Click()
if command1.Left>=form1.Width-command1.Width
   Command1.Left = 0
   End If
   Command1.Left = Command1.Left + 150
End SubPrivate Sub Command3_Click()
End
End Sub
我改了，为什么还是不行呢？也是语法错误，
Private Sub Command2_Click()     这一行显示为黄色
if command1.Left>=form1.Width-command1.Width    这一行显示为红色
我在输入上面这句后，回车，出现“编译错误：缺少then或go to "
唉，其实这个问题在书上是很简单的，可是我怎么这么笨呢，又要麻烦大家了