中国12海里范围:在vb 编译的过程中出现错误:在该对象模块派生的对象模块中成员已存在

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/27 10:17:49
这个提示是什么意思?
代码:
Private Sub Command1_Click()
Text2.Text = 2 ^ Text1.Text - 1
Call hanoi(Text1.Text, a, b, c)
End Sub

Sub hanoi(ByVal n As Integer, ByVal a As String, ByVal b As String, ByVal c As String)
If n = 1 Then
Call move(a, c)
Else
Call hanoi(n - 1, a, c, b)
Call move(a, c)
Call hanoi(n - 1, b, a, c)
End If
End Sub

Sub move(x As String, y As String)
Label1.Caption = Label1.Caption + Chr(13) + Str(x) + "->" + Str(y)
End Sub

Move 在VB中早有定义,是一个控制对象Top 和 Left 的既定方法。

所以Move是一个保留的关键词。
你只要把"Move"改成其他就可以了,例如改成"Mov"