开启左侧

VBA中的msgbox函数

[复制链接]
etthink 发表于 2021-11-30 17:23:01 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题
MsgBox (prompt [, buttons] [, title], [, helpfile, context])
注意,MsgBox函数有五个参数,只有第一个,Prompt(提示),是必须的;这些列在方括号里面的参数都是可选的。
VBA中的按钮值.png
当你显示只有一个按钮的信息框时,可以点击确定按钮或者回车键将信息框从屏幕上移除,然而,当信息框有两个或以上的按钮时,你的程序需要知道按的是哪个按钮。你可以将信息框结果储存在一个变量上来实现。

VBA中的按钮值2.png
Sub MsgYesNo3()
             Dim question As String
             Dim myButtons As Integer
             Dim myTitle As String
             Dim myChoice As Integer
             question = "Do you want to open a new workbook?"
             myButtons = vbYesNo + vbQuestion + vbDefaultButton2
             myTitle = "New workbook"
             myChoice = MsgBox(question, myButtons, myTitle)
             MsgBox myChoice
End Sub


在上面的过程里,你将MsgBox函数的结果赋给变量myChoice。注意,现在,MsgBox函数的参数列在括号里面:


myChoice = MsgBox(question, myButtons, myTitle)


当你运行MsgYesNo3时,出现带有两个按钮的信息框,当你点击“是”时,MsgBoxmyChoice将显示数字6;当点击“否”则得到数字7。你将在第五章里面学习如果让程序根据按钮的选择进行不同的任务。


技巧:函数——使用还是不使用括号?
当你需要使用MsgBox函数返回的结果时,需要使用括号将该函数的参数包括起来。不使用括号,意味着你告诉VB你将忽略该函数的结果。当MsgBox函数包含两个或以上的按钮时,你很可能想要使用该函数的结果。
学教育技术,上教育技术论坛!http://www.etthink.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则


11关注

448粉丝

5675帖子

会员达人更多+
广告位

最新信息

更多+

关注我们:教育技术人

官方微信

官方微博

教育技术热线:

13955453231

学教育技术,上教育技术论坛!

教育技术论坛征稿范围:教育技术应用案例、教程文章、优秀作品等。

Email:sf@etthink.com

Copyright   ©2007-2026  教育技术论坛  Powered by©Discuz!  技术支持:且行资源    ( 皖ICP备10014945号-4 )