使用msgbox函数和msgbox过程主要用于数据信息的输出。今天我们将结合具体事例对这两种东西进行具体的讲解。例使用msgbox函数,单击窗体时,在具有“是”和“否”按钮的对话框中显示一条严重的错误信息,本例中的默认按钮为“否”。根据msgbox的返回值确定用户单击了哪一个键

前期准备工作(包括相关工具或所使用的原料等)
本教程由爱在西元前316提供,有疑问可随时向百度作者鸿翔进行提问百度首发,希望能得到亲们的支持,你的支持是我们创作的动力详细的操作方法或具体步骤分析案例
本题只需要一个窗体,无需进行界面对象设计,要知道用户单击了哪一个键,需对msgbox函数的返回的整数进行判断,而非msgbox过程。

因为按钮是“是”和“否”,按钮类型为严重错误型,默认按钮为第二个,所以按钮的参数的值应为:vbyesno+vbcritical+vbdefaultbutton2

用msgbox过程显示用户单击了哪个按钮的信息

详细的操作方法或具体步骤2编程代码
编写窗体(设其姓名为form1)click事件。
即在窗体上写入一个command1命令按钮,然后我们可以在程序代码窗口对象下拉列表框中选中form,这时我们可以在代码列表框中看到如下的代码。
Private Sub Command1_Click()
End Sub

输入代码
Private Sub Command1_Click()
Dim msg As String * 40, style%, titl$, response%
msg="do you want to continue?" '定义信息
style=vbYesNo + vbCritical + vbDefaultButton2 '定义按钮
titl="msgbox demonstration" '定义标题
response=MsgBox(msg, style, titl)
If response=vbYes Then '用户单击"是"按钮
MsgBox "用户单击yes按钮"
Else ''用户单击"否"按钮
MsgBox "用户单击no按钮"
End If
End Sub

注意事项
本教程由爱在西元前316提供,有疑问可随时向百度作者鸿翔进行提问百度首发,希望能得到亲们的支持,你的支持是我们创作的动力经验内容仅供参考,如果您需解决具体问题(尤其法律、医学等领域),建议您详细咨询相关领域专业人士。作者声明:本教程系本人依照真实经历原创,未经许可,谢绝转载。- 评论列表(网友评论仅供网友表达个人看法,并不表明本站同意其观点或证实其描述)
-
