永发信息网

VB程序设计中MsgBox怎么用

答案:5  悬赏:0  手机版
解决时间 2021-04-27 13:30
VB程序设计中MsgBox怎么用
最佳答案
msgbox "内容","窗口类型","标题"
内容 :必选的
窗口类型 标题 :可选的
全部回答

追问大神追答?追问
求解

MsgBox 函数示例:
本示例使用 MsgBox 

函数,在具有“是”及“否”按钮的对话框中显示一条严重错误信息。示例中的缺省按钮为“否”,MsgBox 函数的返回值视用户按哪一个钮而定。本示例假设
DEMO.HLP 为一帮助文件,其中有一个内容代码为 1000。Private Sub Form_Click()
    Dim Msg, Style, Title, Help, Ctxt, Response, MyString
    Msg = "Do you want to continue ?"   ' 定义信息。
    Style = vbYesNo + vbCritical + vbDefaultButton2   ' 定义按钮。
    Title = "MsgBox Demonstration"   ' 定义标题。
    Help = "DEMO.HLP"   ' 定义帮助文件。
    Ctxt = 1000   ' 定义标题
          ' 上下文。
          ' 显示信息。
    Response = MsgBox(Msg, Style, Title, Help, Ctxt)
    If Response = vbYes Then   ' 用户按下“是”。
        MyString = "Yes"   ' 完成某操作。
    Else   ' 用户按下“否”。
        MyString = "No"   ' 完成某操作。
    End If
End Sub
MsgBox 函数,在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮。

很简单的用法,
 
直接 MsgBox +空格+“你想显示的字符串”
 
如下图:


追问MsgBox a$, b$ ,c$,1能得到什么样的结果我知道a$是字符串,在那道题中是个单词追答就是会显示 a$ 变量对应的字符串。追问那……1对应显示的是什么呢
追答1的意思是: 那个显示上只会显示一个 “确定” 按钮。就类似发的那图片那样。
例如:
sub main
msgbox "helloworld"
end sub
关于msgbox:
1、作用
在消息框中显示信息,并等待用户单击按钮,可返回单击的按钮值(比如“确定”或者“取消”)。通常用作显示变量值的一种方式。
2、语法
MsgBox(Prompt[,Buttons][,Title][,Helpfile,Context])
参数说明:
(1)Prompt,必需的参数,为字符串,作为显示在消息框中的消息文本。其最大长度约为1024个字符,由所用字符的宽度决定。如果prompt的内容超过一行,则可以在每一行之间用回车符(Chr(13))、换行符(Chr(10))或是回车与换行符的组合(Chr(13)&Chr(10))将各行分隔开来。
(2)Buttons,可选的参数,为数值表达式的值之和,指定显示的按钮的数目及形式、使用的图标样式、缺省按钮及消息框的强制回应等,可以此定制消息框。若省略该参数,则其缺省值为0。设置值见下表。
(3)Title,可选的参数,表示在消息框的标题栏中所显示的文本。若省略该参数,则将应用程序名放在标题栏中。
(4)Helpfile,可选的参数,为字符串表达式,提供帮助文件。若有Helpfile,则必须有Context。
(5)Context,可选的参数,为数值表达式,提供帮助主题。若有Context,则必须有Helpfile。
3、Button参数
用于MsgBox函数中Button参数的常量
常量 值 说明
vbOKOnly 0 只显示“确定”按钮
VbOKCancel 1 显示“确定”和“取消”按钮
VbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略” 按钮
VbYesNoCancel 3 显示“是”、“否”和“取消”按钮
VbYesNo 4 显示“是”和“否”按钮
VbRetryCancel 5 显示“重试”和“取消”按钮
VbCritical 16 显示“关键信息”图标
VbQuestion 32 显示“警告询问”图标
VbExclamation 48 显示“警告消息”图标
VbInformation 64 显示“通知消息”图标
vbDefaultButton1 0 第一个按钮是缺省值(缺省设置)
vbDefaultButton2 256第二个按钮是缺省值
vbDefaultButton3 512第三个按钮是缺省值
vbDefaultButton4 768第四个按钮是缺省值
vbApplicationModal 0应用程序强制返回;应用程序一直被挂起,直到用户对消息框
作出响应才继续工作
vbSystemModal 4096系统强制返回;全部应用程序都被挂起,直到用户对消息框作
出响应才继续工作
vbMsgBoxHelpButton 16384将Help按钮添加到消息框
VbMsgBoxSetForeground 65536指定消息框窗口作为前景窗口
vbMsgBoxRight 524288文本为右对齐
vbMsgBoxRtlReading 1048576指定文本应为在希伯来和阿拉伯语系统中的从右到左显示
说明:
(1)第一组值(0–5)描述了消息框中显示的按钮的类型与数目;第二组值(16,32,48,64)描述了图标的样式;第三组值(0,256,512,768)说明哪一个按钮是缺省值;而第四组值(0,4096)则决定消息框的强制返回性。将这些数字相加以生成Buttons参数值的时候,只能由每组值取用一个数字。
(2)这些常数都是VBA指定的,可以在程序代码中使用这些常数名称代替实际数值。
4、返回值
用于MsgBox函数返回值的常量
常数 值 说明
vbOK 1 确定
vbCancel 2 取消
vbAbort 3 终止
vbRetry 4 重试
vbIgnore 5 忽略
vbYes 6 是
vbNo 7 否
5、相关说明
(1) 如果同时提供了Helpfile与Context参数,可以按F1键来查看与Context相应的帮助主题,Excel通常会在输入框中自动添加一个帮助(Help)按钮。
(2)若在消息框中显示“取消”按钮,则按下ESC键与单击“取消”按钮效果相同。若消息框中有“帮助”按钮,则提供相关的帮助信息。
(3)如果要输入多个参数并省略中间的某些参数,则必须在相应位置加入逗号分界符。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
吃饱了没事做该怎么办?
朗逸宝来新速腾哪个好
找几个玩QQ农场群
遥想公谨当年?
我的笔记本怎么修?
爸爸写给孩子的祝福语,浮华轻飞落,作诗的话
姓门的专属句子
用XP的系统盘分区,但不安装XP,可以么
为什么和亲爱的的越来越没共鸣了呢?
谁给我苏州礼安药店的网点地址
西南证券怎么转账?
中国石化拿山加油站在哪里啊,我有事要去这个
谁能给我想个个性的英文名字?
有类似公主恋人这样子的动漫介绍吗????谢
求急搜索 淘宝旺铺装修模板2个?
推荐资讯
鼓励考试失利的诗句,古人考试失利后悲伤的诗
四川省商业学校地址在什么地方,想过去办事
QQ华夏武魂的那个灵引从哪里来?
QQ宠物相关问题?
李姓的由来
香巴佬熟食城分店在什么地方啊,我要过去处理
吉庆村这个地址在什么地方,我要处理点事
红队口号霸气,【红日】是个团队名,想用这两
QQ幻想世界最高多少级?
劳动合同一年一鉴与一年,三年,五年鉴有何区别
好闺蜜茶语地址有知道的么?有点事想过去
丝路英雄的联盟谁能加我啊 联盟有15人的加
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?