UC知道这个VB程序怎么只有一个输出
来源：百度知道 编辑：UC知道 时间：2024/05/15 23:50:49
Private Sub Command1_Click()
Form1.Cls
End Sub
Private Sub Command2_Click()
Dim M As String
M = InputBox("请输入一句话", "提示", "", 300, 300)
Print M
End Sub
Private Sub Form_Load()
Form1.Show
Form1.Print "你好"
End Sub
Private Sub form_unload(cancel As Integer)
Form1.Hide
MsgBox "再见"
End Sub
Form1.Cls
End Sub
Private Sub Command2_Click()
Dim M As String
M = InputBox("请输入一句话", "提示", "", 300, 300)
Print M
End Sub
Private Sub Form_Load()
Form1.Show
Form1.Print "你好"
End Sub
Private Sub form_unload(cancel As Integer)
Form1.Hide
MsgBox "再见"
End Sub
M = InputBox("请输入一句话", "提示", "", 300, 300) 这条语句不对
就改成"M = InputBox("请输入一句话",, "提示", "", 300, 300) "
这样就可以了，我试过
代码没有问题,你单击按钮2,就可以输入,输出了!!