可视化程序设计-实验8数据文件.docVIP

广州大学学生实验报告 开课学院及实验室： 2013 年12月19日 学 院 机电 年级、专业、班 姓名 学号 实验课程名称 VB实验 成绩 实验项目名称 实验8数据文件 指导 教师 实验目的 1．掌握文件的概念及其使用方法。 2．掌握文件系统控件、文件与目录的相关函数和语句的使用。 3．熟悉文件在应用程序中的作用和意义。 二、实验原理 1．对话框程序设计 （1）预定义对话框（InputBox和MsgBox函数） （2）自定义对话框 1）BorderStyle属性：窗体的BorderStyle属性值设置为3 2）ControlBox属性：属性值为True时窗体显示控制菜单框，为False时不显示。 3）显示自定义对话框 使用窗体对象的Show方法显示自定义对话框。 a、模式对话框 〈窗体名〉. Show vbModal （其中vbModal是系统常数，值为1） b、无模式对话框 〈窗体名〉. Show 4）隐藏自定义对话框 使用Hide方法或UnLoad语句来关闭自定义对话框。 Me.Hide 或 窗体名.Hide UnLoad 窗体名 （3）通用对话框 通用对话框是ActiveX控件，该控件提供了6种Windows风格的常用对话框。 通用对话框控件提供了6种Windows风格的常用对话框。通过设置Action属性值或调用Show方法来建立不同类型的对话框。 2．文件对话框：件对话框包括： 打开（Open）文件对话框 保存（Save As）文件对话框 （1）文件对话框结构 （2）文件对话框属性 a. FileName(文件名称）属性：在程序中可用该属性值设置或返回用户所选定的文件名（包含路径） b. FileTitle（文件标题）属性：在程序中可用该属性值设置或返回用户所选定的文件名（不包含路径） c. Filter（过滤器）属性：确定文件列表框中所显示文件的类型，该属性的值显示在“文件类型”列表框中。如设置其值为： Documents(*.DOC)|*.DOC|Text Files(*.TXT)|*.txt|All Files(*.*)|*.* 则在“文件类型”列表框显示下列三种文件类型以供用户选择 Documents(*.DOC) 扩展名为DOC的Word文件 Text Files(*.TXT) 扩展名为TXT的文本文件 All Files(*.*) 所有文件 d. FilterIndex（过滤器索引）属性：为整型值，表示用户在文件类型列表框选定了第几组文件类型。 e. InitDir（初始化路径）属性：该属性用来指定打开对话框中的初始目录，若不设置，系统则默认为“C:\My Documents\”。 f． DefaultExt属性：字符型，用于确定保存文件的缺省扩展名。 g． CancelError属性：逻辑型值，表示用户在与对话框进行信息交换时，按下“取消”按钮时是否产生出错信息。 h. Flags（对话框设置开关）属性：为整型值。 3. 颜色对话框 Color属性是“颜色”对话框最重要的属性，它返回或设置在调色板中选定的颜色。 4. 字体对话框 字体对话框是Action为4时的通用对话框，提供用户选择字体、字号及字体样式等。字体对话框重要的属性有：Color, FontName,FontSize,FontBold，FontItalic,FontStrikethru, FontUnderline,Max,min等，见下图。 Flags属性：确定对话框中显示的字体类型。注意 在显示“字体”对话框前，必须先设置Flags 属性,否则，会发生字体不存在的错误。 系统常数 值 说 明 cdlCFScreenFonts H1 使对话框只列出系统支持的屏幕字体 cdlCFPrinterFonts H2 使对话框只列出打印机支持的字体 cdlCFBoth H3 使对话框列出可用的打印机和屏幕字体 cdlCFEffects H100 指定对话框允许删除线、下划线以及颜色效果 “字体”按钮的程序代码如下： Priv