Question

VB缺少语句结束怎么回事

Private Sub ActiveMovie1_PositionChange(ByVal oldPosition As Double, ByVal newPosition As Double)
MsgBos ("谢谢观赏!")
End Sub

Private Sub Form_Load()
ActiveMovie1.FileName = App.Path&"\3.mpg"
End Sub

提示缺少语句结束
"\3.mpg"红色 亮了 求教错在哪里？

Answer 1

& 前（后）应该有空格,否则可能会把&与前面的字母一起看作一个变量名.

追问

谢谢 这个问题解决了 但是现在点生成工程1、
提示子程序或函数为定义
求教

追答

要注意:如果没有强制变量声明.
未声明的数组变量可能会出这种问题,因为程序会把未声明的数组当作函数或子程序看.
看一下提示的错误位置在哪

另外你的那句
MsgBos ("谢谢观赏!")

最好是先声明一个INTEGER变量比如：
DIM 提示 AS INTEGER
然后写成
提示=MsgBos ("谢谢观赏!")