VB程序设计(第2版)教学课件4-3-输出对话框.pptx

1、输出对话框问题引入这样的输出消息框在VB中如何实现？列表框列 输出对话框概述1列 MsgBox方法2 MsgBox函数3输出对话框输出对话框概述输出对话框概述 输出对话框是用MsgBox消息框实现输出信息的。MsgBox消息框有两种形式，即：MsgBox方法和MsgBox函数。MsgBoxMsgBox方法方法 MsgBox方法用于向用户输出提示信息。【格式】MsgBox 消息文本，显示按钮和图标，标题MsgBox 全班学生及格率为：&Str(80)&%,及格率消息文本标题“显示按钮和图标”省略，只显示一个“确定”按钮，无图标。MsgBoxMsgBox方法方法【参数说明1】消息文本 指在对话框中

2、显示的文本，是消息提示信息。若消息提示信息包含多行，可在各行之间用回车换行符组合“Chr(13)&Chr(10)”或常量“VbCrLf”来实现。MsgBox 消息文本，显示按钮和图标，标题MsgBoxMsgBox方法方法 可选项，是一个整型表达式，用于指定输出对话框中显示的按钮类型与数目、使用的图标样式、默认按钮选中状态。若省略，默认值为0。【参数说明2】显示按钮和图标MsgBox 消息文本，显示按钮和图标，标题MsgBoxMsgBox方法方法 可选项，在对话框标题栏中显示的标题，省略时Visual Basic将应用程序名显示在标题栏中。【参数说明3】标题MsgBox 消息文本，显示按钮和图标

3、，标题MsgBoxMsgBox方法方法MsgBox消息框按钮类型与数目对应取值分 类符 号 常 数取 值描 述按钮类型与数目VbOkOnly0只显示“确定”按钮VbOkCancel1显示“确定”及“取消”按钮VbAbortRetryIgnore2显示“放弃”、“重试”及“忽略”按钮VbYesNoCancel3显示“是”、“否”及“取消”按钮VbYesNo4显示“是”及“否”按钮VbRetryCancel5显示“重试”及“取消”按钮MsgBoxMsgBox方法方法MsgBox消息框图标样式对应取值分 类符 号 常 数取 值描 述图标样式VbCritical16显示 图标VbQuestion32显

4、示 图标VbExclamation48显示 图标VbInformation64显示 图标MsgBoxMsgBox方法方法分 类符 号 常 数取 值描 述默认按钮VbDefaultButton10第一个按钮是默认值VbDefaultButton2256第二个按钮是默认值VbDefaultButton3512第三个按钮是默认值VbDefaultButton4768第四个按钮是默认值MsgBox消息默认按钮对应取值MsgBoxMsgBox方法方法【MsgBox方法说明】若对话框中显示“取消”按钮，则按【Esc】键与单击【取消】按钮的效果是相同的。代码中如果省略某些参数，则相应的逗号分界符不能省。Ms

5、gBoxMsgBox方法方法【MsgBox方法说明】“显示按钮和图标”中的数值是从上面3组数据中各取一个数值相加而得。注：每个表中只能取一个值。如：取值为65，系统会自动将它分解为3个值：1（显示“确定、取消”按钮）、64（显示 图标）、0（第一个按钮为默认按钮），即：65=1+64+0。MsgBoxMsgBox方法方法【MsgBox方法说明】不允许输出对话框未关闭就执行程序的其他部分。MsgBoxMsgBox方法方法【应用】写出实现右图提示信息的语句。MsgBox 此路段限速80，你超速了!,49,警告!MsgBoxMsgBox方法方法【应用】写出实现右图提示信息的语句。MsgBox 我学习

6、了MsgBox方法的应用!,64,学习MsgBoxMsgBox方法方法【应用】写出实现右图提示信息的语句。MsgBox 你学会了吗？,32,学习MsgBoxMsgBox方法方法【应用】写出实现右图提示信息的语句。MsgBox 我还是不懂！,20,学习MsgBoxMsgBox函数函数 MsgBox函数不仅向用户输出提示信息，而且要求用户作出必要的回答，等待用户单击按钮，根据选取的的按钮，返回一个数值。【格式】变量=MsgBox（消息文本，显示按钮和图标，标题)MsgBox函数返回的值指明了对话框中选择哪一个按钮。MsgBoxMsgBox函数函数MsgBox函数的返回值符 号 常 数值描 述VbO

7、k1用户单击“确定”按钮VbCancel2用户单击“取消”按钮VbAbort3用户单击“放弃”按钮VbRetry4用户单击“重试”按钮VbIgnore5用户单击“忽略”按钮VbYes6用户单击“是”按钮VbNo7用户单击“否”按钮MsgBoxMsgBox函数函数【应用】写出实现右图提示信息的语句。Private Sub Command5_Click()Dim x As Integer x=MsgBox(输入密码错!,5+48+0,验证密码)End Sub单击“重试”，x的值是4。单击“取消”，x的值是2。总总 结结 利用MsgBox方法和MsgBox函数可以完成信息的输出。MsgBox 消息文本，显示按钮和图标，标题 变量=MsgBox（消息文本，显示按钮和图标，标题)