张昌宗武则天嗯啊哦:vb高手进,2秒钟

来源:百度文库 编辑:中科新闻网 时间:2024/07/06 17:35:46
怎么用msgbox编写一个黑板擦的清除程序
就是cls的程序,用在msgbox函数中

是要这样吗?

Private Sub Form_Click()
Print "dsaf"
End Sub

Private Sub Form_DblClick()
If MsgBox("确定要清除?", 1 + 32 + 0, "清除") = vbOK Then
Form1.Cls
End If
End Sub

黑板擦的清除程序???不明白