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

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

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

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

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

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

6、2, 学习MsgBox方法2【应用】 写出实现右图提示信息的语句。MsgBox 我还是不懂！, 20, 学习MsgBox函数3 MsgBox函数不仅向用户输出提示信息，而且要求用户作出必要的回答，等待用户单击按钮，根据选取的的按钮，返回一个数值。【格式】变量= MsgBox（消息文本，显示按钮和图标，标题) MsgBox函数返回的值指明了对话框中选择哪一个按钮。MsgBox函数3MsgBox函数的返回值符 号 常 数值描 述VbOk1用户单击“确定”按钮VbCancel2用户单击“取消”按钮VbAbort3用户单击“放弃”按钮VbRetry4用户单击“重试”按钮VbIgnore5用户单击“忽略”按钮VbYes6用户单击“是”按钮VbNo7用户单击“否”按钮MsgBox函数3【应用】 写出实现右图提示信息的语句。Private Sub Command5_Click() Dim x As Integer x = MsgBox(输入密码错!, 5 + 48 + 0, 验证密码)End Sub单击“重试”，x的值是4。单击