VB的输入和输出.ppt

* 本章小结： 掌握inputbox、msgbox、print等输入输出函数 第四章 VB 及动态网页设计 * 第6讲 数据的输入输出 本章内容及要求： 数据的输入函数 常用的格式定位函数 常用的数据输出函数 重点：常用的输入输出函数，键盘与鼠标事件过程 难点：Inputbox、Msgbox函数 * 4.1 数据输入 一、 InputBox函数 默认值 对话框标题 提示信息 变量名=InputBox(提示信息[，对话框标题][，输入区的默认值 ] [,对话框坐标] ) 例如，要在屏幕上显示如下的对话框: * 【说明】 该函数的返回值默认为字符串，如果要把返回值进行其他类型的处理，要么事先声明返回值的类型，要么对返回的字符串进行类型转换。 注意：一个InputBox函数只接受一个值的输入。 提示信息：必选项，提示用户在输入框中输入信息，长度不能超过1 024个字节。 对话框标题：在对话框的标题栏显示的标题信息，如果默认，则标题为“工程1”。 * 输入区的默认值：指用户在输入框输入信息之前在其中显示的内容。无论是否输入新的信息，单击“确定”按钮后，返回输入框的当前值；单击“取消”按钮，则返回长度为零的字符串。 对话框坐标：确定对话框的位置，分别表示对话框的左上角到屏幕左边界和上边界的距离，必须成对出现。 * 【例4-1】 在对话框中输入圆的半径，如图4-1所示，计算并输出圆的面积，如图4-2所示。 图 4-1 输入圆的半径 * 图4-2 计算并输出圆的面积 * “面积计算”命令按钮对应代码如下： Private Sub Command1_Click() Dim r, s As Single r = InputBox(请输入半径：, 计算圆的面积, 1) s = 3.14 * r * r Print Print 圆的面积是 ： ; s End Sub * 4.1.2 MsgBox()函数 格式：变量= MsgBox(提示信息 [, 对话框类型][, 对话框标题]) 其中:对话框类型=[按钮[＋图标]+ [缺省按钮]+[模式]] 图标 标题 提示信息 命令按钮 * 说明： 消息对话框用于提示用户进行后面操作的选择，作为继续执行程序的依据。 提示信息：必选项，提示用户在输入框中输入信息，长度不能超过1 024个字节。 * 对话框类型：为整数或符号常量，用于指定对话框中出现的控制按钮和图标的种类和数量，一般有4个参数，用“＋”号相连，参数的取值可以是数字形式和符号常量形式。如果默认某个参数，不能省略逗号，要以逗号标识是哪个默认。第1个参数表示对消息框中按钮数目的选择，第2个参数表示对消息框中图标类型的选择，第3个参数表示对消息框中默认按钮的选择，第4个参数表示消息框的模式值。参数的取值和含义分别如表4-1、表4-2和表4-3所示。 * 表4-1 第1个参数——按钮类型 取 值 符 号 常 量 意 义 0 VbOkOnly “确定”按钮 1 VbOkCancel “确定”和“取消”按钮 2 vbAbortRetryIgnore “终止”、“重试”和“忽略”按钮 3 VbYesNoCancel “是”、“否”和“取消”按钮 4 VbYesNo “是”和“否”按钮 5 VbRetryCancel “重试“和“取消”按钮 * 表4-2 第2个参数——图标类型 取 值 符 号 常 量 意 义 16 VbCritical 停止图标 32 VbQuestion 问号图标 48 VbExclamation 感叹号图标 64 VbInformation 消息图标 * 表4-3 第3个参数——默认按钮 取 值 符 号 常 量 意 义 0 VbDefaultButton1 默认按钮为第一个按钮 256 VbDefaultButton2 默认按钮为第二个按钮 512 VbDefaultButton3 默认按钮为第三个按钮 * MsgBox函数的返回值反映了用户选择的按钮，返回值与按钮类型的对应情况如表4-4所示。 表4-4 返回值与按钮类型的对应情况 取 值 符 号 常 量 意 义 1 VbOk “确定”按钮 2 VbCancel “取消”按钮 3 VbAbort “终止”按钮 4 VbRetry “重试”按钮 5 VbIgnore “忽略”按钮 6 VbYes “是” 按钮 7 VbNo “否” 按钮 * 【例4-2】 显示如图4-3（a）所示的消息框，提示信息“数据已经修改，是否保存？”，有“是(Y)”、“否(N)”和“取消”3个命令按钮，默认按钮为“是(Y)”按钮。单击“是(Y)”按钮，显示如图4-3（b）所示的消息框，显示“