vb子过程或函数未定义

来源:百度知道 编辑:UC知道 时间:2024/09/27 05:52:11
Private Sub CmdJump_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
X = Ran() * (Form.Width - CmdJump.Width)
Y = Ran() * (Form.Height - CmdJump.Height)
CmdJump.Left = X
CmdJump.top = Y
End Sub

运行的时候说 子过程或函数未定义,Rnd不是VB的库函数吗?高手指点一下啊,具体点,新手
改成Rnd了,可是又显示 错误424,,“要求对象”

我来回答吧
Ran 那个的确是错了 可哪个只是小问题
你有一个更大的错误 就是X Y都是只读的 因为你MOUSEMOVE的时候就确定了X Y值 你需要重新定义变量存储 后面的就不用我说了把 很简单的

问题是你写错了,写成了RAN了呀

Ran()
是rnd()

相当不错