高考问答我和女总裁的荒岛生活:熟悉VB得朋友们请进
来源：百度文库 编辑：高考问答 时间：2024/04/25 20:14:19
请问我这段代码对吗
private sub form_click()
msg1$="aaaaaaaaaaaaa"
msg2$="bbbbbbbbbbbbb"
r=msgbox(msg1$,34,msg2$)
print r
end sub
为什么总告诉我变量未定义，我应改怎么定义啊
private sub form_click()
msg1$="aaaaaaaaaaaaa"
msg2$="bbbbbbbbbbbbb"
r=msgbox(msg1$,34,msg2$)
print r
end sub
为什么总告诉我变量未定义，我应改怎么定义啊
估计你的窗体代码处第一行有这句:
Option Explicit
它用于强制显式声明模块中的所有变量。在VB6.0中变量名中不能使用$字符.
修改代码如下:
Option Explicit'强制显式声明变量
Dim msg1 As String
Dim msg2 As String
Dim r As String
Private Sub form_click()
msg1 = "aaaaaaaaaaaaa"
msg2 = "bbbbbbbbbbbbb"
r = MsgBox(msg1, 34, msg2)
Print r
End Sub
晕
你的VB是什么版本？我用vb6.0 sp4测试没问题呀！