新Visual Basic程序设计基础 教学课件 李群先 第08章.pptVIP

第8章 对话框设计 8.1 预定义对话框 8.2 自定义对话框 8.3 通用对话框 8.1 预定义对话框 8.1.1 数据输入对话框——InputBox函数 InputBox函数是一个允许用户进行数据输入的函数。InputBox函数所产生的对话框是数据输入的界面，待用户输入数据后按回车键或单击“确定”按钮，函数将输入的内容作为字符串返回。 格式：InputBox(prompt[,title][,default][,xpos,ypos][,helpfile,context]) InputBox函数格式中包含7个参数，参数的含义如下： ? prompt：是一个提示用户输入的字符串，在对话框的提示行显示 。该参数不可省略。 ? title：是一个对话框标题字符串，显示在对话框顶部的标题栏。如果省略，对话框的标题栏与工程名称一致。 ? default：为字符串，用于输入数据区的默认信息。用户可以修改该数据，如果省略此参数，数据区为空白。 ? xpos,ypos：这是两个整型数，分别用来确定对话框与屏幕左上角的位置。屏幕左上角的坐标为（0，0），xpos为左边的距离，ypos为下边的距离。默认时对话框在屏幕中心略靠上的位置。 ? helpfile,context：helpfile是一个字符串变量或字符串表达式，用来表示帮助文件的名字。context是一个数值变量或表达式。用来表示相关帮助主题的帮助目录号。这两个参数必须同时使用或省略。当同时使用时，将在对话框中出现一个“帮助”按钮，单击这个按钮或按F1键，可得到有关的帮助信息。 要点提示： （1）各项参数必须一一对应，如果处于中间位置的参数省略，其对应的逗号不能省略。 如：N=InputBox(输入年龄, ,18) 其中省略了title参数 （2）InputBox函数返回的是字符类型数据，如果要得到数值类型数据必须进行数据类型转换，可用Val()函数转换。 8.1.2 消息框 ——MsgBox函数与MsgBox语句 MsgBox函数与MsgBox语句都会产生对话框，并给出可供选择的信息让用户选择，通过用户的选择接受用户的响应，作为继续执行的依据。 1．MsgBox函数 格式：MsgBox(msg[,type][,title][,helpfile,context]) MsgBox函数可以返回一些确定的数值，这些数值是由参数决定的。MsgBox函数有5个参数，其中的title,helpfile,context参数与InputBox函数的含义相同，其余参数的含义为： ? msg：是MsgBox函数产生对话框的提示信息，含义与InputBox函数的prompt 含义相同。该参数不可省略。 ? type：是一个整型数值或符号常量，用来控制在对话框内显示的按钮、图标的种类及数量。参数值由4类数值相加产生，形式是：[按钮类型和数目]+[图标类型]+[默认按钮]+[模式]。4种类型数值见表8-1。 ? MsgBox函数的返回值：函数调用后根据用户对按钮的选择不同，返回不同的数值。在按钮类型里面涉及到7个按钮，返回值与这7个按钮相对应，分别为1~7这7个整数。按钮对应的数值见表8-2。 2．MsgBox语句 MsgBox函数可以书写成语句形式，即形成MsgBox语句。 格式：MsgBox msg[,type][,title][,helpfile,context] 以上是一条语句，参数的含义及作用与MsgBox函数相同。但MsgBox语句没有返回值，所以常用于简单的信息提示。 8.2 自定义对话框 8.3 通用对话框 Visual Basic 6.0提供了通用对话框控件（CommonDialog），通过此控件即可以定义引例所需要的文件打开、文件保存、颜色、字体、打印对话框。 （1）通用对话框是一种ActiveX控件，为了将通用对话框添加到工具箱中，按如下步骤操作： ① 执行“工程”菜单的“部件”命令，打开“部件”对话框。 ② 在对话框中选择“部件”选项卡，然后在控件列表框中选择“Microsoft Common Dialog Control 6.0”。 ③ 单击“确定”按钮，通用对话框即被添加到工具箱中。如图8-11所示。 通用对话框的默认名称（Name属性）*为CommonDialogx（x 为1、2、3…）。 （2）通用对话框的类型 通用对话框控件（CommonDialog）提供了一组标准的操作对话框，进行诸如打开和保存文件、设置打印选项、选择颜色和字体等操作。这些对话框与Windows及一些应用程序具有相同的风格。在设计阶段Common