使用VB程序制作记事本讲述.ppt

使用VB程序制作记事本 鲁 燃 前导知识及新知识引入 界面设计的基本控件 VB程序设计的语法 VB程序设计的基本语句 演示“记事本” 实现目标 教学目标及要求 掌握VB创建记事本的方法 通过创建记事本，要求熟悉以下内容 菜单的创建 通用对话框的使用 文件的基本操作 认识菜单 在VB中创建菜单 菜单编辑器 菜单编辑注意事项 访问键设置 （访问字母键），如：文件（F） 分隔线设置 在标题处输入“-”号 菜单只识别单击事件：click 通用对话框 通用对话框Windows系统提供的一种Active X 控件VB中称之为CommonDialog 控件. 6种标准对话框，分别是： 打开(Open)、另存为(Save as)、颜色(Color)、 字体(font)、打印机(Printer)、和帮助(Help). 添加CommomDialog 控件的方法： 工程--部件---Microsoft Common Dialog Control 6.0 打开“通用对话框”的方法 通用对话框常用属性 FileName 在程序中返回用户选择的文件名（包括路径） 如：ss = cd1.FileName 注意和FileTitle的区别 Filter 设置对话框打开文件的类型，若能打开多类文件，用“｜”分开。 如：cd1.Filter = 文本文件(*.txt)|*.TXT|所有文件(*.*)|*.* 文件操作 按照文件的存取访问方式分为： 顺序访问文件（顺序文件） 随机访问文件（随机文件） 二进制访问文件（二进制文件） 文件的操作顺序 打开文件 读写文件 关闭文件 顺序文件的打开/建立操作 格式： Open 文件名 For input｜output｜append As [#]文件号 [Len=缓冲区大小] 说明： 文件名：绝对路径，缺省路径时表示当前目录 Input：读：文件必须事先存在 Output：写 Append：追加 文件号：用来标识打开文件的数字号，范围是1-511。 顺序文件的打开操作-示例 Open “c:\cj.txt” for input as #1 Open ss for input as #1 顺序文件的读操作 Line Input语句 格式：Line Input #文件号,变量名 作用：从顺序文件中读出一行后，存放在所对应的字符型或变体型变量中去。 示例： Line Input #1，a 顺序文件的写操作 Write 格式：Write #文件号,[输出表达式列表] 将输出表达式列表先写入指定的文件。 示例 Write #1,a 顺序文件的关闭操作 Close命令 格式：Close #文件号1，[#文件号2[，…]] 说明： 可以同时关闭多个已打开的文件。 将缓冲区内的内容写入磁盘。 释放该文件号，以供其它Open语句使用。 文件处理时注意问题 文件操作时用到函数 Eof（）：测试指针是否到了文件末尾。如果到了文件的末尾，其值为True，否则为False。 Chr（），通过转换ASCII码值10，13 实现回车换行功能。 保存代码 Dim ss As String CD1.Filter = 文本文件(*.txt)|*.TXT|所有文件(*.*)|*.* CD1.ShowSave ss = CD1.FileName Open ss For Output As #1 Write #1, Text1.Text Close #1 打开代码 Dim ss As String Dim sdata As String CD1.Filter = 文本文件(*.txt)|*.TXT|所有文件(*.*)|*.* CD1.ShowOpen ss = CD1.FileName Open ss For Input As #1 Do While EOF(1) = False Line Input #1, sdata Text1.Text = Text1.Text + sdata + Chr(13) + Chr(10) Loop Close #1 本节内容回顾 通过以下内容的使用，掌握创建记事本程序的方法 菜单的创建 通用对话框的使用 文件的基本操作 问题思考及作业 使用ShowColor、ShowFont、ShowPrint等，进一步丰富记事本程序的功能。 预习多文档窗体（MDI）创建。 本次课结束谢谢大家 * * 显示”Windows帮助”对话框 6 ShowHelp 显示”打印机”对话框 5 ShowPrint 显示”字体”对话框 4 ShowFont 显示”颜色”对话框 3 ShowColor 显示文件”另存为”对话框 2 ShowSave 显示文件”打开”对话