请VB高手看看这段代码 很短的..

来源:百度知道 编辑:UC知道 时间:2024/05/21 16:57:24
Dim inputnum As String

Private Sub loaddata()
inputnum = Text1.Text
End Sub

Private Sub Command1_Click()
MsgBox inputnum, vbDefaultButton1, "VB教程第四章范例"

End Sub

Private Sub Form_Load()
Call loaddata
End Sub

就这么一个简单的小例子我居然都无法实现 就是希望能点按钮后 弹的框能显示输入的字符 可弹出的对话框什么都没有显示

Dim inputnum As String

Private Sub loaddata()
inputnum = Text1.Text
End Sub

Private Sub Command1_Click()
Call loaddata
MsgBox inputnum, vbDefaultButton1, "VB教程第四章范例"

End Sub

Private Sub Form_Load()

End Sub

这个程序可以成功运行的啊