项目8 制作简单记事本

1、VBVB程序设计项目化教程程序设计项目化教程 主编主编 管小清管小清 郭贺彬郭贺彬 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 项目八项目八 制作简单记事本制作简单记事本 n项目目标：项目目标： n本项目是制作一个简易的记事本（类似于本项目是制作一个简易的记事本（类似于Windows 自自 带的记事本），能够实现文件的存取等基本操作；设带的记事本），能够实现文件的存取等基本操作；设 计出相关的菜单栏，并实现部分菜单项的基本功能；计出相关的菜单栏，并实现部分菜单项的基本功能； 利用公共对话框来设置一些常用的功能（字体设置，利用公共对话框来设置一些常用的功能（

2、字体设置， 颜色设置，打印以及文件操作等）。颜色设置，打印以及文件操作等）。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 项目八项目八 制作简单记事本制作简单记事本 n项目主要知识点：项目主要知识点： n1、RichTextBox的使用的使用 n文件操作方法文件操作方法 n常用格式化属性常用格式化属性 n插入图像插入图像 n2、菜单编辑器的使用、菜单编辑器的使用 n设计菜单的操作步骤设计菜单的操作步骤 n打开菜单编辑器的方法打开菜单编辑器的方法 n菜单编辑器的组成部分菜单编辑器的组成部分 n3、公共对话框（、公共对话框（CommonDialog）的使用）的

3、使用 n通用对话框基本属性通用对话框基本属性 n通用对话框的方法通用对话框的方法 n打开对话框的方法打开对话框的方法 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 项目八项目八 制作简单记事本制作简单记事本 n4、位置属性和字体属性、位置属性和字体属性 n5、编程思想的培养、编程思想的培养 n项目实施步骤：项目实施步骤： n阅读相关基础知识阅读相关基础知识 n界面设计界面设计 o窗体设计窗体设计 o控件属性设置控件属性设置 o添加菜单栏添加菜单栏 o添加公用对话框添加公用对话框 n程序设计程序设计 o编程初步编程初步 o程序代码程序代码 n程序调试，功能完善

4、程序调试，功能完善 n保存项目工程和再次打开工程保存项目工程和再次打开工程 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n8.1.1 高级文本框控件高级文本框控件 n高级文本框控件高级文本框控件(RichTextBox)可用于输入和编辑文本，它同时可用于输入和编辑文本，它同时 提供了比常规的提供了比常规的TextBox控件更高级的格式特性。控件更高级的格式特性。 n从前几章可以知道，对从前几章可以知道，对Text控件只能进行单一的文字格式设置。控件只能进行单一的文字格式设置。 使用使用RichTextBox控件可以实

5、现多种文字格式、段落等的设置，控件可以实现多种文字格式、段落等的设置， 还可以插入图形，可真正构成一个像还可以插入图形，可真正构成一个像Word一样的字处理软件。一样的字处理软件。 n要使用要使用RichTextBox控件，必须打开控件，必须打开“部件部件”对话框，选择对话框，选择 “Microsoft Rich TextBox Controls 6.0”，将控件添加到工具，将控件添加到工具 箱。箱。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n1、文件操作方法、文件操作方法 n用用LoadFile和和SaveFi

6、le方法，可以方便地为方法，可以方便地为RichTextBox控件打开或保存文件。控件打开或保存文件。 n（1）LoadFile方法方法 n格式：对象格式：对象.LoadFile 文件标识符，文件类型文件标识符，文件类型 n功能：功能：LoadFile方法能够将方法能够将RTF文件或文本文件装入控件中。文件或文本文件装入控件中。 n说明：说明： n文件类型取值文件类型取值0或或rtfRTF时为时为RTF文件文件(缺省缺省)。 n文件类型取文件类型取1或或rtfTEXT时为文本文件。时为文本文件。 n过程存放在标准模块中，利用过程存放在标准模块中，利用CommonDialog控件提供路径名。控件

7、提供路径名。 n（2）SaveFile方法方法 n格式：对象格式：对象.SaveFile(文件标识符，文件类型文件标识符，文件类型) n功能：该方法能够将控件中的文档保存在功能：该方法能够将控件中的文档保存在RTF文件或文本文件中。文件或文本文件中。 n例如：下面语句把文档以例如：下面语句把文档以RTF格式保存在格式保存在D盘盘My子目录的子目录的T1.txt文件中。文件中。 n RichTextBox1.SaveFile(D:myT1.txt,rtfTEXT) n完整的保存文件的完整的保存文件的FileSaveProc过程，可参照过程，可参照FileOpenProc过程，请读者自行过程，请读

8、者自行 完成。完成。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n2、常用格式化属性、常用格式化属性 nRichTextBox控件提供了一控件提供了一 些属性，可对该控件中任何些属性，可对该控件中任何 部分的文本使用不同的格式。部分的文本使用不同的格式。 例如可以将文本变为粗体或例如可以将文本变为粗体或 斜体，改变文本的颜色，创斜体，改变文本的颜色，创 建上标或下标。可以调整段建上标或下标。可以调整段 落的左右缩进值，还可以使落的左右缩进值，还可以使 用悬挂式缩进。为了压缩篇用悬挂式缩进。为了压缩篇 幅，列出了常用

9、格式属性如幅，列出了常用格式属性如 表表8-1所示所示： 表8-1RichTextBox常用属性 分类分类属性属性 值类值类 型型 说明说明 选中文 本 SelText Selstart Sellength 意义同Text控件对应 属性 字体、 字 号 Selfontname selfontsize 当前选定的文本的字 体字号 字型 Selbold SelItalic SelUnderline SelStrikethru 逻辑 量 粗体、斜体、下划线、 删除线 上、下 标 SelCharoffset整型 0上标0下标以Twip 为单位 颜色SelColor整型 缩排 SelIndex SelR

10、ightInde nt SelHaningIndent 数值 型 缩排单位以ScalMode 决定 对齐SelAlignment整型0 左 1右 2中 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n3、插入图像、插入图像 n格式：对象格式：对象.OLEObjects.Add索引索引，关键字关键字，文件标识符，文件标识符 n功能：在功能：在RichTextBox控件中，可插入（控件中，可插入（*.bmp）图像文件。）图像文件。 n说明：说明： nOLEObjects是一个集合，包括一组添加到是一个集合，包括一组添加到R

11、ichTextBox控件的控件的 对象。对象。 n“索引索引”和和“关键字关键字”分别表示添加的元素编号和标识，可省略，分别表示添加的元素编号和标识，可省略， 但逗号不能省。但逗号不能省。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n8.1.2 通用对话框的使用通用对话框的使用 n通用对话框是一种通用对话框是一种ActiveX控件，它随同控件，它随同VB提供给程序设计人员。在一提供给程序设计人员。在一 般情况下，启动般情况下，启动VB后，在工具箱中没有通用对话框控件。为了把通用对后，在工具箱中没有通用对话框控件。为

12、了把通用对 话框控件加到工具箱中，其操作步骤如下：话框控件加到工具箱中，其操作步骤如下： n执行执行“工程工程”菜单中的菜单中的“部件部件”命令，打开命令，打开“部件部件”对话框。对话框。 n在对话框中，选择在对话框中，选择“控件控件”选项卡，然后在控件列表框中，选择选项卡，然后在控件列表框中，选择 “Microsoft Common Dialog Control 6.0”，如图，如图8-3所示。所示。 n单击单击“确定确定”按钮，通用对话框立即被加到工具箱中，如图按钮，通用对话框立即被加到工具箱中，如图8-2所示。所示。 n通用对话框的默认名称通用对话框的默认名称(Name属性属性)为为Co

13、mmonDialogX(X为为1，2，3)。 n通用对话框控件为程序设计人员提供了几种不同类型的对话框，利用这通用对话框控件为程序设计人员提供了几种不同类型的对话框，利用这 些对话框，可以获取所需要的信息，打开文件、将文件存盘、选择颜色、些对话框，可以获取所需要的信息，打开文件、将文件存盘、选择颜色、 选择字体、打印、帮助。这些对话框与选择字体、打印、帮助。这些对话框与Windows本身及许多应用程序具本身及许多应用程序具 有相同的风格。对话框的类型可以通过有相同的风格。对话框的类型可以通过Action属性设置，也可以用相应属性设置，也可以用相应 的方法设置。的方法设置。 VBVB程序设计项目

14、化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n1、通用对话框的基本属性、通用对话框的基本属性 n（1）Action属性属性 n该属性直接决定打开何种类型的对话框。该属性直接决定打开何种类型的对话框。 n1Open：打开文件对话框；：打开文件对话框； n2Save As：另存为对话框；：另存为对话框； n3Color：颜色对话框；：颜色对话框； n4Font：字体对话框；：字体对话框； n5Printer：打印机对话框；：打印机对话框； n6Help：帮助对话框。：帮助对话框。 n该属性不能在属性窗口中设置，只能在程序中赋值，用于调出相该

15、属性不能在属性窗口中设置，只能在程序中赋值，用于调出相 应的对话框。应的对话框。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n（2）DialogTitle属性属性 n该属性用来设置对话框的标题，可以是任意字符串。在默认情况该属性用来设置对话框的标题，可以是任意字符串。在默认情况 下，下，“打开打开”对话框的标题是对话框的标题是“打开打开”，“另存为另存为”对话框的标对话框的标 题是题是“另存为另存为”。 n通用对话框的属性设置不仅可以在属性窗口中设置，也可以在属通用对话框的属性设置不仅可以在属性窗口中设置，也可以在

16、属 性页对话框中设置。打开属性页对话框的方法是：在窗体上的通性页对话框中设置。打开属性页对话框的方法是：在窗体上的通 用对话框控件上单击右键，在弹出的快捷菜单中，选择用对话框控件上单击右键，在弹出的快捷菜单中，选择“属性属性” 命令，通用对话框控件属性页对话框中，有命令，通用对话框控件属性页对话框中，有5个选项卡，对不同个选项卡，对不同 类型的对话框设置属性，就要选择不同的选项卡。例如，要对字类型的对话框设置属性，就要选择不同的选项卡。例如，要对字 体对话框进行设置，就选定体对话框进行设置，就选定“字体字体”选项卡。选项卡。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水

17、利水电出版社 8.1 第第1步：基础知识步：基础知识 n2、通用对话框的方法、通用对话框的方法 n为了打开通用对话框，为了打开通用对话框，VB还提供了一组方法，用来打开通用对话还提供了一组方法，用来打开通用对话 框，对话框类型及方法如表框，对话框类型及方法如表8-2所示。这些方法是：所示。这些方法是： nShowOpen：打开文件对话框；：打开文件对话框； nShowSave：打开另存为对话框；：打开另存为对话框； nShowColor：选择颜色对话框；：选择颜色对话框； nShowFont：选择字体对话框；：选择字体对话框； nShowPrinter：打开打印对话框；：打开打印对话框； nS

18、howHelp：调出帮助对话框。：调出帮助对话框。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n 表表8-2 对话框类型及方法对话框类型及方法 n通用对话框的使用方式有：打开对话框、另存为对话框、颜色对通用对话框的使用方式有：打开对话框、另存为对话框、颜色对 话框、字体对话框、打印机对话框和帮助对话框的使用方法。话框、字体对话框、打印机对话框和帮助对话框的使用方法。 对话框类型Action属性值方法 打开打开1ShowOpen 另存为另存为2ShowSave 颜色颜色3ShowColor 字体字体4ShowFont

19、 打印打印5ShowPrinter 帮助帮助6ShowHelp VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n3、打开、打开(Open)对话框对话框 n（1）文件对话框的结构）文件对话框的结构 n文件对话框分为两种，即打开文件对话框分为两种，即打开(Open)文件对话框和另存为文件对话框和另存为(Save As)文件对话框。文件对话框。 通用对话框的重要用途之一，就是从用户那里获得文件名信息。打开文件对话框通用对话框的重要用途之一，就是从用户那里获得文件名信息。打开文件对话框 可以让用户指定一个文件，由程序来实现；而

20、用保存文件对话框可以指定一个文可以让用户指定一个文件，由程序来实现；而用保存文件对话框可以指定一个文 件，并以这个文件名保存当前文件。从结构上来说，件，并以这个文件名保存当前文件。从结构上来说，“打开打开”和和“另存为另存为”对话对话 框是类似的。如图框是类似的。如图8-1所示：所示： 图8-1“打开”对话框 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n各部分的作用如下：各部分的作用如下： n对话框标题：通用对话框的标题，通过对话框标题：通用对话框的标题，通过DialogTitle属性设置。属性设置。 n文件夹：用

21、来显示文件夹。单击右端的箭头，将显示驱动器和文文件夹：用来显示文件夹。单击右端的箭头，将显示驱动器和文 件夹的列表，可以在该列表中选择所需要的文件夹。件夹的列表，可以在该列表中选择所需要的文件夹。 n选择文件夹级别：单击一次该按钮回退一个文件夹级别。选择文件夹级别：单击一次该按钮回退一个文件夹级别。 n新文件夹：用来建立新文件夹。新文件夹：用来建立新文件夹。 n文件列表模式：选择是否以列表方式显示文件和文件夹。文件列表模式：选择是否以列表方式显示文件和文件夹。 n文件细节：显示文件的详细情况，包括文件名、文件大小、建立文件细节：显示文件的详细情况，包括文件名、文件大小、建立 (修改修改)日期、

22、时间及属性等。日期、时间及属性等。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.1 第第1步：基础知识步：基础知识 n文件列表：在该区域显示的是文件列表：在该区域显示的是“文件夹文件夹”栏内文件夹的子目录，栏内文件夹的子目录， 列出了准备使用的文件或文件夹，单击其中的文件名将选择该文列出了准备使用的文件或文件夹，单击其中的文件名将选择该文 件，所选择的文件名将在件，所选择的文件名将在“文件名文件名”栏内显示出来。如果当前显栏内显示出来。如果当前显 示的文件列表中没有所需要的文件，可双击其中的文件夹显示下示的文件列表中没有所需要的文件，可双击其中的文件夹

23、显示下 一级的文件或文件夹。一级的文件或文件夹。 n文件类型：指定要打开或要保存的文件的类型，该类型由通用对文件类型：指定要打开或要保存的文件的类型，该类型由通用对 话框的话框的Filter属性确定。属性确定。 n文件名：所选择的或输入的文件名。用文件名：所选择的或输入的文件名。用“打开打开”或或“另存为另存为”对对 话框都可以指定一个文件名，所指定的文件名在该栏内显示，单话框都可以指定一个文件名，所指定的文件名在该栏内显示，单 击击“打开打开”或或“另存为另存为”按钮后，将以该文件名打开或保存文件。按钮后，将以该文件名打开或保存文件。 n在对话框的右下部还有两个按钮，即在对话框的右下部还有两

24、个按钮，即“打开打开”和和“取消取消”。在。在 “另存为另存为”对话框中，对话框中，“打开打开”按钮用按钮用“保存保存”取代。取代。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.2 第第2步：设计窗体步：设计窗体 n在窗体上添加多行文本框（在窗体上添加多行文本框（RichTextBox），调整大小并修改相），调整大小并修改相 应属性，如图应属性，如图8-2所示：所示： 图8-2添加RichTextbox控件 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.2 第第2步：设计窗体步：设计窗体 n相应的控件及属性如表相

25、应的控件及属性如表8-6所示：所示： 表8-6相应的控件及属性 控件名称控件名称属性名称属性名称属性值属性值控件名称控件名称 属性名属性名 称称 属性值属性值 窗体 （Form1） Caption记事本 文本框 （RichTextBox ） Text清空 Width自定Width自定 Height自定Height自定 MaxButtonFalse NameR1 MinButtonFalse VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n菜单对我们来说是非常熟悉的，在菜单对我们来说是非常熟悉的，在W

26、indows环境下，几乎所有的环境下，几乎所有的 应用软件都是通过菜单来实现各种操作。菜单用于给命令进行分应用软件都是通过菜单来实现各种操作。菜单用于给命令进行分 组，使用户能够更方便、更直观地访问这些命令。组，使用户能够更方便、更直观地访问这些命令。 n下拉式菜单是一种典型的窗口式菜单。窗口是指屏幕上一个特定下拉式菜单是一种典型的窗口式菜单。窗口是指屏幕上一个特定 的矩形区域。它可以从屏幕上消失，也可以重新显示在屏幕上，的矩形区域。它可以从屏幕上消失，也可以重新显示在屏幕上， 各个窗口之间也允许覆盖。下拉式菜单自上而下在屏幕上各个窗口之间也允许覆盖。下拉式菜单自上而下在屏幕上“下拉下拉” 一

27、个个窗口菜单，供用户选择或输入信息。在一个个窗口菜单，供用户选择或输入信息。在Windows及各种应及各种应 用软件中，下拉式菜单得到了广泛的应用。用软件中，下拉式菜单得到了广泛的应用。 n在下拉式菜单系统中，一般有一个主菜单，其中包括若干选择项。在下拉式菜单系统中，一般有一个主菜单，其中包括若干选择项。 主菜单的每一项又主菜单的每一项又“下拉下拉”出下一级菜单，这样逐级下拉，用一出下一级菜单，这样逐级下拉，用一 个个窗口的形式弹出在屏幕上，操作完毕即可从屏幕上消失，并个个窗口的形式弹出在屏幕上，操作完毕即可从屏幕上消失，并 恢复原来的屏幕状态。恢复原来的屏幕状态。 VBVB程序设计项目化教程

28、程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n弹出式菜单是一种小型的菜单，它可以在窗体的某个地方显示出弹出式菜单是一种小型的菜单，它可以在窗体的某个地方显示出 来，对程序事件作出响应。通常用于对窗体中某个特定区域有关来，对程序事件作出响应。通常用于对窗体中某个特定区域有关 的操作或选项进行控制，例如用来改变某个文本区的字体属性等。的操作或选项进行控制，例如用来改变某个文本区的字体属性等。 与下拉式菜单不同，弹出式菜单不需要在窗口顶部下拉打开，而与下拉式菜单不同，弹出式菜单不需要在窗口顶部下拉打开，而 是通过单击鼠标右键，在

29、窗口是通过单击鼠标右键，在窗口(窗体窗体)的任意位置打开，因而使用的任意位置打开，因而使用 方便，具有较大的灵活性方便，具有较大的灵活性 n1、设计菜单的操作步骤如下：、设计菜单的操作步骤如下： n(1)建立窗体，添加控件。建立窗体，添加控件。 n(2)打开打开“菜单编辑器菜单编辑器”窗口。窗口。 n(3)设置各菜单项属性。设置各菜单项属性。 n(4)为相应的菜单命令添加事件过程。为相应的菜单命令添加事件过程。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n对于可视语言对于可视语言(如如VB、VF

30、P、VC等等)来说，菜单的设计要简单和直观得多，来说，菜单的设计要简单和直观得多， 因为它省去了屏幕位置计算，也不需要保存和恢复屏幕区域。全部设计因为它省去了屏幕位置计算，也不需要保存和恢复屏幕区域。全部设计 都在一个窗口中完成。利用这个窗口，可以建立下拉式菜单，最多可达都在一个窗口中完成。利用这个窗口，可以建立下拉式菜单，最多可达6 层。层。 n在在VB中，设计菜单是通过菜单编辑器，即菜单设计窗口来完成的。打开中，设计菜单是通过菜单编辑器，即菜单设计窗口来完成的。打开 菜单编辑器有以下菜单编辑器有以下4种方法：种方法： n(1)在在VB主设计窗口中，选择主设计窗口中，选择“工具工具”中的中的

31、“菜单编辑器菜单编辑器”选项。选项。 n(2)使用热键使用热键Ctrl+E。 n(3)单击工具栏中的单击工具栏中的“菜单编辑器菜单编辑器”按钮。按钮。 n(4)在要建立菜单的窗体上单击鼠标右键，将弹出一个菜单然后单击在要建立菜单的窗体上单击鼠标右键，将弹出一个菜单然后单击“菜菜 单编辑器单编辑器”命令。命令。 n说明：只有当某个窗体为活动窗体时，才能用上面的方法打开说明：只有当某个窗体为活动窗体时，才能用上面的方法打开“菜单编菜单编 辑器辑器”窗口。打开后的窗口。打开后的“菜单编辑器菜单编辑器”窗口。窗口。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.

32、3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n“菜单编辑器菜单编辑器”窗口分为窗口分为3个部分，即数据区、编辑区和菜单项显示区。个部分，即数据区、编辑区和菜单项显示区。 n(1).数据区数据区 n用来输入或修改菜单项、设置属性。分为若干栏，各栏的作用如下：用来输入或修改菜单项、设置属性。分为若干栏，各栏的作用如下： n标题：是一个文本框，用来输入所建立菜单的标题及菜单中每个菜单标题：是一个文本框，用来输入所建立菜单的标题及菜单中每个菜单 项的标题，相当于控件的项的标题，相当于控件的Caption属性。属性。 n如果在如果在“标题标题”栏内，只输入一个减号栏内，只输入一个减号(-)，

33、则可在菜单中加入一条分隔，则可在菜单中加入一条分隔 符。符。 n在输入菜单栏项时，如果在字母前加上在输入菜单栏项时，如果在字母前加上“&”，那么该字母就成了热键字，那么该字母就成了热键字 母。在显示菜单时在该字母下加上一条下划线，可以通过母。在显示菜单时在该字母下加上一条下划线，可以通过Alt+带下划线带下划线 的字母，来打开菜单或执行相应的菜单命令。的字母，来打开菜单或执行相应的菜单命令。 n 名称：也是一个文本框，由用户输入菜单项的名称，在程序中用来标名称：也是一个文本框，由用户输入菜单项的名称，在程序中用来标 识该菜单项，相当于控件的识该菜单项，相当于控件的Name属性，它不会在菜单项显

34、示区中显示属性，它不会在菜单项显示区中显示 出来。在标题文本框中，输入了一个菜单标题，在名称文本框中，应有出来。在标题文本框中，输入了一个菜单标题，在名称文本框中，应有 一个对应的菜单名称。分隔符也要有对应的名称。一个对应的菜单名称。分隔符也要有对应的名称。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n索引：用来为控件数组设计下标。索引：用来为控件数组设计下标。 n快捷键：是一个列表框，用来设置菜单项的快捷键。单击右端的箭头，将下拉快捷键：是一个列表框，用来设置菜单项的快捷键。单击右端的箭头，将

35、下拉 显示可供使用的快捷键。在此可选择输入与菜单项等价的快捷键。显示可供使用的快捷键。在此可选择输入与菜单项等价的快捷键。 n帮助上下文：是一个文本框，可在该框中输入数值，这个值用来在帮助文件帮助上下文：是一个文本框，可在该框中输入数值，这个值用来在帮助文件(用用 HelpFile属性设置属性设置)中查找相应的帮助主题。中查找相应的帮助主题。 n协调位置：是一个列表框，用来确定菜单或菜单项是否出现或在什么位置出现。协调位置：是一个列表框，用来确定菜单或菜单项是否出现或在什么位置出现。 单击右端的箭头，将下拉一个列表，如图单击右端的箭头，将下拉一个列表，如图10.4所示。该列表有所示。该列表有4

36、个选项，其作用如个选项，其作用如 下：下： n作用作用: n 0-None 菜单项不显示菜单项不显示 n 1-Left 菜单项靠左显示菜单项靠左显示 n 2-Middle 菜单项居中显示菜单项居中显示 n 3-Right 菜单项靠右显示菜单项靠右显示 n复选：是一个检查框，当选择该项时，可以在相应的菜单项边上指定记号复选：是一个检查框，当选择该项时，可以在相应的菜单项边上指定记号(例如例如 “”),表示该菜单项是一个选项。表示该菜单项是一个选项。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n有效

37、：是一个检查框，该检查框决定菜单项是否可选有效：是一个检查框，该检查框决定菜单项是否可选(有效有效)。当该检。当该检 查框被选中时，表示菜单项的查框被选中时，表示菜单项的Enabled属性为属性为True，为默认状态，程序，为默认状态，程序 执行时菜单高亮度显示，是可选的；如果该项没有被选中，执行时菜单高亮度显示，是可选的；如果该项没有被选中，Enabled属属 性为性为False，在程序执行时该菜单项变成灰色，表示不能被用户选择。，在程序执行时该菜单项变成灰色，表示不能被用户选择。 n可见：是一个检查框，该检查框确定菜单项是否可见。若该检查框被可见：是一个检查框，该检查框确定菜单项是否可见。

38、若该检查框被 选中，表示该菜单项的选中，表示该菜单项的Visible属性为属性为True，即菜单项可见。若该检查框，即菜单项可见。若该检查框 没被选中，表示该菜单项的没被选中，表示该菜单项的Visible属性为属性为False，即菜单项不可见。，即菜单项不可见。 n显示窗口列表：当该选项被设置为显示窗口列表：当该选项被设置为“On”(框内有框内有“”)时，将显示当时，将显示当 前打开一系列子窗口。用于多文档应用程序。前打开一系列子窗口。用于多文档应用程序。 n（2）编辑区）编辑区 n编辑区共有编辑区共有7个按钮，用来对输入的菜单项进行简单的编辑。菜单在数据个按钮，用来对输入的菜单项进行简单的编

39、辑。菜单在数据 区输入，在菜单项显示区显示。区输入，在菜单项显示区显示。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n有效：是一个检查框，该检查框决定菜单项是否可选有效：是一个检查框，该检查框决定菜单项是否可选(有效有效)。当该检。当该检 查框被选中时，表示菜单项的查框被选中时，表示菜单项的Enabled属性为属性为True，为默认状态，程序，为默认状态，程序 执行时菜单高亮度显示，是可选的；如果该项没有被选中，执行时菜单高亮度显示，是可选的；如果该项没有被选中，Enabled属属 性为性为Fa

40、lse，在程序执行时该菜单项变成灰色，表示不能被用户选择。，在程序执行时该菜单项变成灰色，表示不能被用户选择。 n可见：是一个检查框，该检查框确定菜单项是否可见。若该检查框被可见：是一个检查框，该检查框确定菜单项是否可见。若该检查框被 选中，表示该菜单项的选中，表示该菜单项的Visible属性为属性为True，即菜单项可见。若该检查框，即菜单项可见。若该检查框 没被选中，表示该菜单项的没被选中，表示该菜单项的Visible属性为属性为False，即菜单项不可见。，即菜单项不可见。 n显示窗口列表：当该选项被设置为显示窗口列表：当该选项被设置为“On”(框内有框内有“”)时，将显示当时，将显示当

41、 前打开一系列子窗口。用于多文档应用程序。前打开一系列子窗口。用于多文档应用程序。 n（2）编辑区）编辑区 n编辑区共有编辑区共有7个按钮，用来对输入的菜单项进行简单的编辑。菜单在数据个按钮，用来对输入的菜单项进行简单的编辑。菜单在数据 区输入，在菜单项显示区显示。区输入，在菜单项显示区显示。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n（3）菜单项显示区）菜单项显示区 n位于位于“菜单编辑器菜单编辑器”窗口的下部，输入的菜单项在这里显示出来，并通窗口的下部，输入的菜单项在这里显示出来，并通 过

42、内缩符号过内缩符号(.)，表明菜单项的层次。条形光标所在的菜单项是，表明菜单项的层次。条形光标所在的菜单项是“当前当前 菜单项菜单项”。 n说明：说明： n“菜单项菜单项”是一个总的名称，它包括是一个总的名称，它包括4个方面的内容：菜单名个方面的内容：菜单名(菜单标菜单标 题题)、菜单命令、分隔线和子菜单。、菜单命令、分隔线和子菜单。 n内缩符号由内缩符号由4个点组成，它表明菜单项所在的层次，一个内缩符号个点组成，它表明菜单项所在的层次，一个内缩符号(4个个 点点)表示一层，两个内缩符号表示一层，两个内缩符号(8个点个点)表示两层，最多为表示两层，最多为20个点，即个点，即5个内个内 缩符号，

43、它后面的菜单项是第六层。如果一个菜单项前面没有内缩符号，缩符号，它后面的菜单项是第六层。如果一个菜单项前面没有内缩符号， 则该菜单为菜单名，即菜单的第一层。则该菜单为菜单名，即菜单的第一层。 n只有菜单名没有菜单项的菜单称为只有菜单名没有菜单项的菜单称为“顶层菜单顶层菜单”，在输入这样的菜单，在输入这样的菜单 项时，通常在后面加上一个叹号项时，通常在后面加上一个叹号(！)。 n除分隔线外，所有的菜单项都可以接收除分隔线外，所有的菜单项都可以接收Click事件。事件。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体

44、上添加菜单栏 n2、如图、如图8-3所示设置各菜单项。所示设置各菜单项。 n 注意：（注意：（1）、菜单编辑器必须在设计视图下才能用，在编程视）、菜单编辑器必须在设计视图下才能用，在编程视 图下是不能使用的。图下是不能使用的。 n （2）、所有菜单项的名称命名规则同变量的命名规则相同。）、所有菜单项的名称命名规则同变量的命名规则相同。 n（3）、主菜单项不允许添加快捷键。）、主菜单项不允许添加快捷键。 n（4）、菜单项的分级是靠省略号来区分的。）、菜单项的分级是靠省略号来区分的。 n（5）、菜单项的名称不能相同，否则作为控件数组。）、菜单项的名称不能相同，否则作为控件数组。 n3、各菜单项的属

45、性值如表、各菜单项的属性值如表8-7所示。所示。(如果空白则是默认设置如果空白则是默认设置) n （本部分由学生根据表中数据独立完成）（本部分由学生根据表中数据独立完成） VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 图8-3各菜单项 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 n表表8-7各菜单项的属性值各菜单项的属性值 说明说明标题标题名称名称快捷键快捷键其他其他 主菜单项主菜单项1文件（&W）we

46、njian无 子菜单项11新建（&N）xinjianCtrl+N 子菜单项12打开（&O）dakaiCtrl+O 子菜单项13保存（&S）baocunCtrl+S 子菜单项14L1无 子菜单项15页面设置（&U）yemian无 子菜单项16打印（&P）dayinCtrl+P 子菜单项17L2无 子菜单项18退出（&X）tuichu无 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 主菜单项主菜单项2编辑（&E）bianji无 子菜单项21撤销（&U）chexiaoCtrl+Z无效 子菜单项22L3无

47、子菜单项23剪切（&T）jianqieCtrl+X无效 子菜单项24复制（&C）fuzhiCtrl+C无效 子菜单项25粘贴（&P）zhantie Ctrl+V 子菜单项26删除（&L）shanchuDel无效 子菜单项27L4 子菜单项28查找（&F）chaozhaoCtrl+F无效 子菜单项29查找下一个（&N）xiayigeF3无效 子菜单项210替换（&R）tihuanCtrl+H 子菜单项211转到（&G）zhuandaoCtrl+G VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 子菜单项

48、212L5 子菜单项213全选（&A）quanxuanCtrl+A 子菜单项214日期/时间（&T）riqiF5 主菜单项主菜单项3格式（&O）geshi 子菜单项31自动换行（&W）huanhang 子菜单项32字体（&F）ziti 主菜单项主菜单项4查看（&V）chakan 子菜单项41状态栏（&S）zhuangtailan VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.3 第第3步：在窗体上添加菜单栏步：在窗体上添加菜单栏 主菜单项主菜单项5帮助（&H）bangzhu 子菜单项51帮助主题（&H）zhuti 子菜单项52L6 子菜单项53关于记事本

49、（&A）guanyu VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.4 第第4步：添加步：添加Activate控件控件 n操作方法是：在工具栏上单击右键，在弹出的菜单中操作方法是：在工具栏上单击右键，在弹出的菜单中 选择【部件】，这时会弹出【部件】对话框，选择选择【部件】，这时会弹出【部件】对话框，选择 “Microsoft Rich TextBox Controls 6.0” n添加完毕。添加完毕。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.5 第第5步：为窗体添加公共对话框。步：为窗体添加公共对话框。 n公

50、共对话框的实现的功能：公共对话框的实现的功能： 显示文件打开对话框显示文件打开对话框Show Open 显示文件保存对话框显示文件保存对话框Show Save 显示颜色对话框显示颜色对话框ShowColor 显示字体对话框显示字体对话框ShowFont 显示打印对话框显示打印对话框ShowPrinter n将将Common Dialog控件添加到工具箱：工程控件添加到工具箱：工程部件部件 MicroSoft Common Dialog Control 6.0 (如图如图8-4 所示所示) VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.5 第第5步：为窗体

51、添加公共对话框。步：为窗体添加公共对话框。 图8-4添加Common Dialog控件 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.5 第第5步：为窗体添加公共对话框。步：为窗体添加公共对话框。 n单击工具箱中单击工具箱中 该控件在窗体该控件在窗体 上画出该控件。上画出该控件。 （注意：该控（注意：该控 件是后台运行，件是后台运行， 所以程序运行所以程序运行 后不会显示，后不会显示， 类似于类似于Timer控控 件）如图件）如图8-5所所 示。示。 图8-5工具箱 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.6

52、 第第6步：步： 部分例程序部分例程序 nPrivate Sub baocun_Click()保存按钮的代码保存按钮的代码 nCommonDialog1.ShowSave nR1.SaveFile (CommonDialog1.FileName) nEnd Sub nPrivate Sub dakai_Click()打开命令按钮的代码打开命令按钮的代码 nCommonDialog1.ShowOpen nR1.LoadFile (CommonDialog1.FileName) nEnd Sub nPrivate Sub Form_Load() 设置公共对话框的默认文件类型设置公共对话框的默认文件

53、类型 nCommonDialog1.Filter = 文档文件文档文件 *.txt|*.txt|全部文件全部文件|*.* nEnd Sub VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.6 第第6步：步： 部分例程序部分例程序 nPrivate Sub lingcunwei_Click()另存为按钮的代码另存为按钮的代码 nCommonDialog1.ShowSave nR1.SaveFile (CommonDialog1.FileName) nEnd Sub nPrivate Sub xinjian_Click()新建按钮的代码新建按钮的代码 nR1.

54、Text = nEnd Sub n其他代码在老师的指导下完成其他代码在老师的指导下完成 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.6 第第6步：步： 部分例程序部分例程序 n项目总结：项目总结： n菜单编辑器的使用菜单编辑器的使用 n公共对话框的使用公共对话框的使用 n编程实现属性设置编程实现属性设置 nRichTextBox的使用的使用 n文件的打开方法文件的打开方法 n操作练习操作练习 n编写程序，建立一个文件打开对话框，然后通过这个对话框选择编写程序，建立一个文件打开对话框，然后通过这个对话框选择 可执行文件，并执行它。例如，程序运行后，在对话

55、框中，选择可执行文件，并执行它。例如，程序运行后，在对话框中，选择 windows下的下的“计算器计算器” 程序，然后执行这个程序，打开程序，然后执行这个程序，打开“计算计算 器器”。 n编写程序，在窗体上显示一行信息，通过自己定义的颜色对话框编写程序，在窗体上显示一行信息，通过自己定义的颜色对话框 和字体对话框改变这行信息的颜色和字体和字体对话框改变这行信息的颜色和字体. VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.6 第第6步：步： 部分例程序部分例程序 n在窗体上建立一个通用对话框，在窗体上建立一个通用对话框，1个文本框和个文本框和3个命令个命令

56、 按钮，在文本框中输入一段文本（汉字），然后实现按钮，在文本框中输入一段文本（汉字），然后实现 以下操作：以下操作： o通过字体对话框把文本框中的文字设置为黑体，字体样式设通过字体对话框把文本框中的文字设置为黑体，字体样式设 置为粗体，字体大小设置为置为粗体，字体大小设置为24，该操作在第一个命令按钮的，该操作在第一个命令按钮的 事件过程实现。事件过程实现。 o通过颜色对话框把文本框中的文字的前景颜色设置为红色。通过颜色对话框把文本框中的文字的前景颜色设置为红色。 该操作在第二个命令按钮的事件过程实现。该操作在第二个命令按钮的事件过程实现。 o通过颜色对话框把文本框中的文字的背景颜色设置为黄色

57、。通过颜色对话框把文本框中的文字的背景颜色设置为黄色。 该操作在第三个命令按钮的事件过程实现。该操作在第三个命令按钮的事件过程实现。 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社 8.6 第第6步：步： 部分例程序部分例程序 n在窗体上画一个文本框，把它的在窗体上画一个文本框，把它的Multiline属性设置为属性设置为True；通过菜单命令向文；通过菜单命令向文 本框中输入信息并对文本框中的的文本进行格式化。按下述要求建立菜单程序：本框中输入信息并对文本框中的的文本进行格式化。按下述要求建立菜单程序： o菜单程序含有菜单程序含有3个主菜单，分别为个主菜单，分别为“输入信息输入信息”、“显示信息显示信息”和格式。其中：和格式。其中：“输入输入 信息信息”包括两个菜单命令：包括两个菜单命令：“输入输入”、“退出退出”； n“显示信息显示信息”包括两个菜单命令：包括两个菜单命令：“显示显示”、“清除清除”； n“格式格式”包括包括5个菜单命令：个菜单命令：“正常正常”、“