Question

在VB窗体中编写了一个程序 想使用输入对话框使用后 总提示语法错误

Private Sub Form_click()
call inputbox("请输入"，"等级考试"，"Basic"）
End Sub

Answer 1

InputBox 函数示例

本示例说明使用 InputBox 函数来显示用户输入数据的不同用法。如果省略 x 及 y
坐标值，则会自动将对话框放置在两个坐标的正中。如果用户单击“确定”按钮或按下“ENTER”按键，则变量 MyValue
保存用户输入的数据。如果用户单击“取消”按钮，则返回一零长度字符串。

Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3"   ' 设置提示信息。
Title = "InputBox Demo"   ' 设置标题。
Default = "1"   ' 设置缺省值。
' 显示信息、标题及缺省值。
MyValue = InputBox(Message, Title, Default)
' 使用帮助文件及上下文。“帮助”按钮便会自动出现。
MyValue = InputBox(Message, Title, , , , "DEMO.HLP", 10)
' 在 100, 100 的位置显示对话框。
MyValue = InputBox(Message, Title, Default, 100, 100)
' InputBox 函数是有返回值的！

Answer 2

你的大小写不对吧，看下面的代码：

Private Sub Command1_Click()
Call InputBox("请输入", "等级考试", "Basic")
End Sub

Answer 3

不用call,如果后面用括号的话前面要加“=”赋值给变量

还有，参数之间用英文的逗号隔开

Private Sub Form_Click()
    InputBox "请输入", "等级考试", "Basic"
End Sub

Answer 4

两个逗号换成英文的逗号就好了