高等学校计算机础教育教材.pptVIP

4.“字体”对话框 Flags属性：指示所显示的字体类型，必须设置。 cdlCFScreenFonts H1 屏幕字体 cdlCFPrinterFonts H2 打印机字体 cdlCFBoth H3 打印机字体和屏幕字体。 cdlCFEffects H100 显示删除线和下划线检查框以及颜色组合框 FontName FontBold、FontItalic FontSize FontStrikethru FontUnderline Color Min、Max 5. “打印”对话框 属性 FromPage：起始页号； ToPage：终止页号； Copies：打印份数。 如果打印驱动程序不支持多份打印，该属性有可能始终返回 1。 6. “帮助”对话框 帮助文件需要用其他的工具制作，如Microsoft Windows Help Compiler。 属性 HelpCommand：在线Help帮助类型； HelpFile：Help文件的路径及其名称； HelpKey：在帮助窗口显示由该帮助关键字指定的帮助信息。 课后习题 Pg162 第1题 Pg186 第1、2题 * * 高等学校计算机基础教育教材 上海中医药大学现代教育技术中心 计算机教学部 第九章 文 件 1 文件的读写 2 文件系统控件 3 常用的文件操作语句和函数 4 菜单制作 5 通用对话框 9.1 文件的读写 文件：存储在外部介质上数据的集合。 按名存取 1. 记录 由若干个相互关联的数据项组成。 例如，由学生的学习成绩信息组成的记录： 数据项 2. 文件及其种类 文件是记录的集合。 顺序访问模式：顺序文件，记录可长可短； 随机访问模式：随机文件，记录的长度相同； 二进制访问模式：二进制文件（可认为记录长度为1）。 1. 打开文件 Open 文件名 [For 模式] As [#]文件号 [Len=记录长度] (1) 模式 OUTPUT：写操作； INPUT：读操作； APPEND：追加到文件末尾。 (2) 文件号 1～511，可以用FreeFile函数获得下一个可利用的文件号。 (3) 记录长度 小于或等于32767的整数，它指定数据缓冲区的大小。 例如，打开C:\VB\SCORE，供写入数据，指定文件号为#1。 OPEN C:\VB\SCORE FOR OUTPUT AS #1 一、 顺序访问模式 打开文件 读出或写入 关闭文件 2. 写入命令 Print #文件号，[输出列表] 保存文本框 假定文本框的名称为Text1，文件名为TEST.DAT。 方法1：把整个文本框的内容一次性地写入文件。 Open TEST.DAT For Output As #1 Print #1, Text1 Close #1 方法2：把整个文本框的内容一个字符一个字符地写入文件。 Open TEST.DAT For Output As #1 For i=1 To len(Test1) Print #1,Mid(Text1, i, 1); Next i Close #1 Write #文件号，[输出列表] 紧凑格式。数据项之间插入“,”，并加上双引号。 例如，命令：Write #1,One,Two,123 内容：One,Two,123 3. 关闭文件 Close [[#]文件号][, [#]文件号]... 例如，Close #1, #2, #3 4. 读顺序文件 INPUT #文件号,变量列表 把读出的每个数据项分别存放到所对应的变量。 LINE INPUT #文件号,字符串变量 读一行到变量中，主要用来读取文本文件。 INPUT$(读取字符数,#文件号) 随意读取字符 5. 函数 LOF(文件号)：返回文件的长度(总字节数)。 EOF(文件号)：返回读写位置。 指针在文件尾时，EOF函数为True，否则为False。 读文本文件到文本框 假定文本框名称为Text1，文件名为MYFILE.TXT。 方法1：一行一行读 Text1.Text ＝ Open MYFILE.TXT For Input As #1 Do While Not EOF(1) Line Input #1, InputData Text1.Text ＝ Text1.Text + InputData+vbCrLf Loop Cl