导读:操作步骤/方法1编写窗体(设其姓名为form1)click事件。2即在窗体上写入一个command1命令按钮,然后我们可以在程序代码窗口对象下拉列表框中选中form,这时我们可以在代码列表框中看到如下的代码。3PrivateSubCommand1_Click()4EndSub5输入代码6PrivateSubCommand1_Click()7DimmsgAsString*40,style%,titl...
操作步骤/方法
1
编写窗体(设其姓名为form1)click事件。
2
即在窗体上写入一个command1命令按钮,然后我们可以在程序代码窗口对象下拉列表框中选中form,这时我们可以在代码列表框中看到如下的代码。
3
PrivateSubCommand1_Click()
4
EndSub
5
输入代码
6
PrivateSubCommand1_Click()
7
DimmsgAsString*40,style%,titl$,response%
8
msg="doyouwanttocontinue?"'定义信息
9
style=vbYesNo+vbCritical+vbDefaultButton2'定义按钮
10
titl="msgboxdemonstration"'定义标题
11
response=MsgBox(msg,style,titl)
12
Ifresponse=vbYesThen'用户单击"是"按钮
13
MsgBox"用户单击yes按钮"
14
Else''用户单击"否"按钮
15
MsgBox"用户单击no按钮"
16
EndIf
17
EndSub
END
以上就是小编为大家介绍的使用msgbox函数和msgbox过程的全部内容,如果大家还对相关的内容感兴趣,请持续关注上海建站网!
标签:
内容声明:网站所展示的内容均由第三方用户投稿提供,内容的真实性、准确性和合法性均由发布用户负责。上海建站网对此不承担任何相关连带责任。上海建站网遵循相关法律法规严格审核相关关内容,如您发现页面有任何违法或侵权信息,欢迎向网站举报并提供有效线索,我们将认真核查、及时处理。感谢您的参与和支持!