413 Msg Box函数和 Msg Box过程 功能:打开一个信息框,等待用户选择一个按钮 区别: Msg Box函数返回所选按钮的值 Msg Box过程不返回值,常用于简单的信息显示 格式: Msg Box(prompt ,Typel,TitleD Msg Box prompt, Type,Title
11 4.1.3 MsgBox函数和MsgBox过程 • 功能：打开一个信息框，等待用户选择一个按钮 • 区别： MsgBox函数返回所选按钮的值 MsgBox过程不返回值，常用于简单的信息显示 • 格式： MsgBox(Prompt[,Type][,Title]) MsgBox Prompt[,Type][,Title]
MsgB0x函数 函数格式: Msg Box( Prompt, Type, Title Tite标题 °信息窗口 P rompt p 提示 ? Do you want to continue3 图标 匚确定 取消 命令按钮 Pim response as string *20 Response= Msg box(“ Do you want to continu?,+32+0,“信息窗 12
12 MsgBox函数 Title标题 Prompt 提示 命令按钮 图标 函数格式：MsgBox(Prompt[,Type][,Title]) Dim response as string*20 Response=MsgBox(“Do you want to continue?”,1+32+0,“信息窗 口”)
MsgB0x中Type参数设置表 分组 内部常数 值 描述 VBOkOnly 0确定按钮 VBOkCancel 1确定、取消按钮 按钮 VBAboutRetrylgnore 2终止、重试、忽略按钮 数目vEsa 3是、否、取消按钮 VBYesNo 4是、否按钮 VBRetry Cancel 5重试、取消按钮 VBCritical 16关键信息图标 图标 QUEstion 32询问信息图标 类型 VBExclamation 48警告信息图标 区② VBInformation 64信息图标
13 MsgBox中Type参数设置表 VBInformation 64 信息图标 VBExclamation 48 警告信息图标 VBQuestion 32 询问信息图标 VBCritical 16 关键信息图标 图标 类型 VBRetryCancel 5 重试、取消按钮 VBYesNo 4 是、否按钮 VBYesNoCancel 3 是、否、取消按钮 VBAboutRetryIgnore 2 终止、重试、忽略按钮 VBOkCancel 1 确定、取消按钮 VBOkOnly 0 确定按钮 按钮 数目 分组 内 部 常 数 值 描 述 本章目录
MsgB0x涵数返回值 Msg Box函数的返回值是一个整数,这个整数与所 选择的按钮有关 按钮的返回值决定了程序执行的流程 内部常数返回值被单击的按钮 vbok 1确定 vbCancel 取消 abort 终止 reTry 重试 vblgnore 234567 忽略 byEs 是 viNo 否
14 MsgBox函数返回值 • MsgBox函数的返回值是一个整数，这个整数与所 选择的按钮有关 • 按钮的返回值决定了程序执行的流程 本章目录 内部常数 返回值 被单击的按钮 vbOk 1 确定 vbCancel 2 取消 vbAbort 3 终止 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否
Msg Box过程 Msg上 工程1-Form1(Form) 回囟 没有 学号 例44 密码 程序。 操作要 登录 (1 排数字字 符,则给出相应的错误提示。 (2)密码最多为8位,密码掩码为“☆”。假定密 码是“Wang”。如果输入的密码有误,给出相应 的出错信息提示。 15
15 MsgBox过程 • MsgBox Prompt[,Type][,Title] • 没有返回值，常用于简单的信息显示 • 例4.4 编写一个学生成绩查询系统登录程序。 • 操作要求如下： •（1）学号为12位长度的数字。如果出现非数字字 符，则给出相应的错误提示。 •（2）密码最多为8位，密码掩码为“*” 。假定密 码是“Wang”。如果输入的密码有误，给出相应 的出错信息提示