工程(Project)：是指用于创建一个应用程序的文件的集合。 对象(object)：可控制的某个东西,VB 中主要有两类对象:窗体和控件。 窗体(form)：应用程序的用户界面，即 windows。 控件(control)：指的是各种按扭、标签、文本框等。 属性(property)：是指对象的特性，如大小、标题或颜色。 ActiveX:ActiveX 是基于 component object model(com)的可视化控件结构的商标 提供封装 COM 组件并将其置入应用程序(如 WEB 浏览器)的一种方法. 名称.它是一种封装技术,

　　Components Object Model (COM)： 是软件组件互相通讯的一种方式。它是一种二进制和网络标准，允许任 意两个组件互相通讯，而不管它们是在什么计算机上运行(只要计算机是相连的)，不管各计算机运行的是什么操 作系统(只要该操作系统支持 COM)，也不管该组件是用什么语言编写的。 5. VB 的系统特性 (1)工程限制 1)代码限制： 可被加载到窗体、类或标准模块的代码总数限于 65,534 行。一行代码限于 1023 个字节。在一行中的实际 文本之前最多只能有 256 个空格的前导，在一个逻辑行中最多只能有 25 个续行符 ( _)。 2)过程、类型和变量 对每个模块的过程数没有限制。每个过程可包含至多 64K 的代码。如果过程或模块超过这一限制，Visual Basic 便产生编译时间错误。如果遇到这种错误，可将特别大的过程分割成若干个较小的过程，或将模块级声明 移到另一模块，来避免此类错误发生。 Visual Basic 用表来保存代码中的标识符名(变量、过程、常量等)。每个表限于 64K。 3)动态链接库声明表 每个窗体和代码模块使用一个描述动态链接库入口点的结构的表。每个结构约 40 个字节，表的大小限于 64K，形成每个模块大约有 1500 个声明。 4)工程名表 整个应用程序用一张包含所有名称的表。这些名称包括： 常量名 、 变量名 、 自定义的类型定义名、 模 块名、 DLL 过程声明名。 对工程名表总大小没有限制，但是区分大小写的条目不得超过 32K。如果超过了 32K 的限制，可以在不同的模块中重新使用 private 标识符以限制区分大小写的条目数到达 32K。 5)输入表 在不同的模块中每引用一个标识符，便在输入表中创建一个条目。每一个这样的入口最小是 24 字节，但限 于 64K，这样每个模块大约可以有 2000 个引用。

　　6)模块条目表 该表中每个模块最多达 125 个字节， 但有 64K 的总限制， 这样每个工程大约可以产生 400 个模块。 VB 中 的变量名不多于 255 个字符，而窗体、控件、模块和类名不多于 40 个字符。 (2)工程文件格式 VB 在创建和编译工程时要产生许多文件，分为：设计时文件、杂项开发文件和运行时文件。 设计时文件是工程的建造块，例如基本模块 (.bas) 和窗体模块 (.frm)。 杂项文件是由 Visual Basic 开发环境中的各种不同的进程和函数产生的，例如打包和展开向导从属文件 (.dep)。

　　1.2 VB 6.0 的集成开发环境简介 VB 集成开发环境 (IDE——Integrated Developing Environment ) 由以下元素组成： 1. 标题栏 用于显示正在开发或调试的工程名和系统的工作状态（设计态、运行态、中止态）。

　　3. 工具栏 在编程环境下用于快速访问常用命令。缺省情况下，启动 VB 后显示“标准”工具栏，附加的编辑、窗体设计 和调试的工具 栏可以从“视图”菜单上的“工具栏”命令中移进或移出。 4. 窗体设计器 用来设计应用程序的界面。启动 VB 后，窗体设计器中自动出现一个名为 Form1 的空白窗体，可以在该窗体 中添加控件、图形和图片等来创建所希望的外观，窗体的外观设计好后，从菜单中选择“文件”→“保存窗体”→在 保存对话框中给出合适的文件名（注意扩展名），并选择所需的保存位置→确定。需要再设计另一个窗体时，单 击工具栏上的“添加窗体”按钮即可。 5. 控件（工具）箱 由一组控件按钮组成，用于设计时在窗体中放置控件。除了缺省的工具箱布局之外，还可以通过从上下文菜 单中选定“添加选项卡”并在结果选项卡中添加控件来创建自定义布局。 6. 弹出式（上下文）菜单

　　在要使用的对象上单击鼠标右键即可打开快捷菜单， 其上会出现与当前对象相关的经常执行的操作， 以加快 操作速度。 7. 工程管理器窗口 用于浏览工程中所包含的窗体和模块，还可以从中查看代码、查看对象。 8. 属性窗口 是 VB 中一个比较复杂的窗口，其中列出了对选定窗体和控件的属性设置值。VB 中正是通过改变属性来改 变对象的特征，如大小、标题或颜色。 9. 对象浏览器 列出工程中有效的对象， 并提供在编码中漫游的快速方法。 可以使用“对象浏览器”浏览在 VB 中的对象和其 它应用程序，查看对那些对象有效的方法和属性，并将代码过程粘贴进自己的应用程序。 10. 对象浏览器 右击窗体中的对象、从工程管理器中点“查看代码”按钮。 11. 窗体布局窗口 Form Layout window 允许使用表示屏幕的小图象来布置应用程序中各窗体的位置。 12. 立即、本地和监视窗口这些附加窗口是为调试应用程序提供的，它们只在 IDE 之中运行应用程序时才有效。

　　1.3 面向对象程序设计的基本概念 1.基本术语 (1) 对象和对象类 对象是代码和数据的组合，可以作为一个单位来处理。对象可以是应用程序的一部分，比如可以是控件或窗 体。整个应用程序也是一个对象。 VB 中的每个对象都是用类定义的。 用饼干模子和饼干之间的关系作比， 就会明白对象和它的类之间的关系。 饼干模子是类。它确定了每块饼干的特征，比如大小和形状。用类创建对象,对象就是饼干。类是面向对象程序 设计的核心技术，可以理解成一种定义了对象行为和外观的模板；把对象看作是类的原原本本的复制品， 类具有继承性、封装性、多态性、抽象性。 (2) 属性

　　属性是对对象特性的描述，VB 为每一类对象都规定了若干属性，设计中可以改变具体对象的属性值。比如 窗体的背景颜色、高度与宽度。 (3) 事件(Event) 事件是发生在对象上的动作。事件的发生不是随意的，某些事件仅发生在某些对象上。 在 VB 中事件的调用形式是： Private Sub 对象名_事件名 (事件内容) End Sub (4) 方法(Method) 方法指的是控制对象动作行为的方式。它是对象本身内含的函数或过程，它也是一个动作，是一个简单的 不必知道细节的无法改变的事件，但不称作事件；同样，方法也不是随意的，一些对象有一些特定的方法。在 VB 里方法的调用形式是： 对象名.方法名 2. 属性、方法和事件之间的关系 VB 对象具有属性、方法和事件。属性是描述对象的数据；方法告诉对象应做的事情；事件是对象所产生的 事情，事件发生时可以编写代码进行处理。 VB 的窗体和控件是具有自己的属性、方法和事件的对象。可以把属性看作一个对象的性质，把方法看作对 象的动作，把事件看作对象的响应。 日常生活中的对象，如小孩玩的气球同样具有属性、方法和事件。气球的属性包括可以看到的一些性质，如 它的直径和颜色。其它一些属性描述气球的状态(充气的或未充气的)或不可见的性质，如它的寿命。通过定义， 所有气球都具有这些属性；这些属性也会因气球的不同而不同。 气球还具有本身所固有的方法和动作。 充气方法(用氦气充满气球的动作)， 如： 放气方法(排出气球中的气体) 和上升方法(放手让气球飞走)。所有的气球都具备这些能力。 气球还有预定义的对某些外部事件的响应。例如，气球对刺破它的事件响应是放气，对放手事件的响应是升 空。 在 VB 程序设计中，基本的设计机制就是：改变对象的属性、使用对象的方法、为对象事件编写事件过程。 程序设计时要做的工作就是决定应更改哪些属性、调用哪些方法、对哪些事件作出响应，从而得到希望的外观和 行为。 3.事件驱动模型

　　在传统的或“过程化”的应用程序中，应用程序自身控制了执行哪一部分代码和按何种顺序执行代码。从第一 行代码执行程序并按应用程序中预定的路径执行，必要时调用过程。 在事件驱动的应用程序中， 代码不是按照预定的路径执行， 而是在响应不同的事件时执行不同的代码片段。 事件可以由用户操作触发、 也可以由来自操作系统或其它应用程序的消息触发、 甚至由应用程序本身的消息触发。 这些事件的顺序决定了代码执行的顺序，因此应用程序每次运行时所经过的代码的路径都是不同的。 因为事件的顺序是无法预测的，所以在代码中必须对执行时的“各种状态”作一定的假设。当作出某些假设时(例 如，假设在运行来处理某一输入字段的过程之前，该输入字段必须包含确定的值)，应该组织好应用程序的结构， 以确保该假设始终有效(例如，在输入字段中有值之前禁止使用启动该处理过程的命令按钮)。 在执行中代码也可以触发事件。例如，在程序中改变文本框中的文本将引发文本框的 Change 事件。如果 Change 事件中包含有代码，则将导致该代码的执行。如果原来假设该事件仅能由用户的交互操作所触发，则可 能会产生意料之外的结果。 正因为这一原因， 所以在设计应用程序时理解事件驱动模型并牢记在心是非常重要的。 4.交互式开发 传统的应用程序开发过程可以分为三个明显的步骤：编码、编译和测试代码。但是 Visual Basic 与传统的语 言不同，它使用交互式方法开发应用程序，使三个步骤之间不再有明显的界限。 VB 在编程者输入代码时便进行解释，即时捕获并突出显示大多数语法或拼写错误。看起来就象一位专家在 监视代码的输入。 除即时捕获错误以外，VB 也在输入代码时部分地编译该代码。当准备运行和测试应用程序时，只需极短时 间即可完成编译。如果编译器发现了错误，则将错误突出显示于代码中。这时可以更正错误并继续编译，而不需 从头开始。 由于 VB 的交互特性，代码运行的效果可以在开发时进行测试，而不必等到编译完成以后。 1．4 利用 VB 开发应用程序的一般步骤

　　一个 VB 程序也称为一个工程，由窗体、标准模块、自定义控件及应用所需的环境设置组成。开发步骤一般 如下： 1． 创建程序的用户界面 2． 设置界面上各个对象的属性 3． 编写对象响应事件的程序代码 4． 保存工程 5． 测试应用程序，排除错误

　　6． 创建可执行程序 2.1 VB 用户界面设计基础 1. 概述 界面的设计有两步：先绘制控件，然后确定控件属性。 绘制控件：在工具箱里单击想画的控件，在窗体里按下鼠标并拖曳，然后松开鼠标即可。确定属性：先选中 控件，然后按 F4 键或单击工具栏上的属性窗口进入属性(Properties)窗口，再在属性窗口中找到要设置的属性并 进行设置。 2. 常用属性的设置 (1)Name 属性 对象都有名字，计算机把名字看成对象于对象之间的根本差异，因此在同一窗体里不许出现重名的情况(除 非这是一个控件数组)，且名字不得超过 40 个字。 在简单的程序里，给控件命名不是很必要，完全可以使用控件 Name 属性的缺省值。例如 Text1。但在有几 十个控件的复杂窗体里，就很难区分它们。所以，VB 推荐由三个小写字母的前缀和一个第一个字母为大写的描 述性单词组成的名字。例如 cmdMyButton 是一个命令按钮(前缀是 cmd)

　　(2)Caption 属性 Caption 即标题，是可以在对象外观上直接看见的文本，可以长达 255 字符，包括空格和标点符号，比如一 个叫 cmdOk 的命令钮，它的 Caption 属性就可以是“Ok”。 注意：并不是所有的对象都有此属性，比如文本框、 图片框、线条等就没有。 为按钮设置热键：在设置 Caption 属性时，在需要加下划线的字母前加上 “&” 符号，例如 “&File”，输出的 就是“File”，这样就可以通过按 ALT 键和标题上那个带下划线的字母来选取它了, 不必为此编任何代码。 Name 和 caption 的比较： 1) Name 是系统用来识别对象的，编程时需要用它来指代各对象；Caption 是给用户看的，提示用户该对象 的作用； 2) Name 可以采用系统默认的名称，但 Caption 应该根据实际情况改成意义明了的名词； 3)所有对象都有 Name，但不一定都有 Caption； (3)Top，Left 属性 这两个属性决定对象的位置。只有两种情况需要在属性窗口里设置这两个属性：第一种是用户没有鼠标， 第二种是程序员需要十分精确地设定这两个值。当选中对象，单击并拖曳它的时候，便在修改这两个值了。

　　(4)Height，Width 属性 这两个属性决定了对象的大小，当选中控件时，它周围出现八个小黑方块，把鼠标指向这些方块，鼠标指针 将变成一个双向的箭头，这时按下鼠标并拖曳它，即可改变控件的大小，也就改变了 Height，Width 属性。 1. 窗体的属性 (1)设置属性的方法 1）在设计态通过属性窗口设置 直接在属性窗口中选择或输入既可。 2）在程序代码中改变属性值 代码中的格式为： 对象名 . 属性 = 属性值 例：Form1.BackColor=RGB（255，0，0） 2. 窗体的常用方法 （1）Hide 方法 用以隐藏 MDIForm 或 Form 对象，但不能使其卸载。 语法：object.Hide object 所在处代表一个对象表达式，其值为“应用于”列表中的一个对象。如果省略 object，则带有焦点的窗 体就认为是该 object。 说明： 隐藏窗体时， 它就从屏幕上被删除， 并将其 Visible 属性设置为 False。 用户将无法访问隐藏窗体上的控件， 但是对于运行中的 Visual Basic 应用程序， 或对于通过 DDE 与该应用程序通讯的进程及对于 Timer 控件的事 件，隐藏窗体的控件仍然是可用的。 窗体被隐藏时，用户只有等到被隐藏窗体的事件过程的全部代码执行完后才能够与该应用程序交互。 如果调用 Hide 方法时窗体还没有加载，那么 Hide 方法将加载该窗体但不显示它。 （2）Move 方法 用以移动 MDIForm、Form 或控件。 语法：object . Move left, top, width, height

　　说明：只有 left 参数是必须的。但是，要指定任何其它的参数，必须先指定出现在语法中该参数前面的全部参 数。例如，如果不先指定 left 和 top 参数，则无法指定 width 参数。任何没有指定的尾部的参数则保持不变。 （3）Print 方法 在 Immediate 窗口中显示文本。 语法：object . Print [outputlist] Print 方法的语法具有下列对象限定符和部分： 部分 Object outputlist 描述 必需的。对象表达式，其值为“应用于”列表中的对象。 可选的。要打印的表达式或表达式的列表。如果省略，则打印一空白行。

　　outputlist 参数具有以下语法和部分： {Spc(n) Tab(n)} expression charpos 说明： 可以用空白或分号来分隔多个表达式。 对系统指定的国别设置，用小数点分隔符将所有打印到 Immediate 视窗的数据正确格式化。关键字要用适 用于主应用程序的语言输出。 对于 Boolean 数据，或者打印 True 或者打印 False。根据主机应用程序的地区设置来翻译 True 和 False 关键字。 使用系统能识别的标准短日期格式书写 Date 数据。 当日期或时间部件丢失或为零时， 只书写已提供的部件。 如果 outputlist 数据是 Empty， 则无内容可写。 但是， 如果 outputlist 数据是 Null， 则输出 Null。 在输出 Null 关键字时，要把关键字正确翻译出来。 要把错误数据作为 Error errorcode 输出。在输出 Error 关键字时，要把关键字正确翻译出来。 如果在具有缺省显示空间的模块外使用此方法，则需要 object。例如，如果没有指定对象就在标准模块上调 用此方法，则将导致错误发生，但是，如果在窗体模块上进行调用，则会在窗体上显示“outputlist”。 注意： 因为 Print 方法是按照字符比例进行打印，所以字符数与字符所占据的宽度固定的列的数目无关。 例如，像 “W” 这样的宽字母占据的宽度超过一固定列宽BOB体验官网，而像 i 这样的窄字母占据的宽度则较小。考虑到要 使用比平均字符更宽的空间，表列一定要留有足够余地。另外，也可以使用固定间距的字体（像 Courier 字体） 来确保每一字符均只占一列。 （4）PrintFrom 方法 用以将 Form 对象的图象逐位发送给打印机。 语法：object.PrintForm

　　说明：PrintForm 将打印 Form 对象的全部可见对象和位图。在绘制图形时，如果 AutoRedraw 属性为 True，则在运行时 PrintForm 将打印 Form 对象或 PictureBox 控件上的图形。 PrintForm 所使用的打印机是由操作系统的控制面板中的设置来决定。 （5） Refresh 方法 强制全部重绘一个窗体或控件。 语法：object.Refresh 说明：在下列情况下使用 Refresh 方法： 在另一个窗体被加载时显示一个窗体的全部。 更新诸如 FileListBox 控件之类的文件系统列表框的内容。 更新 Data 控件的数据结构。 Refresh 方法不能用于 MDI 窗体， 但能用于 MDI 子窗体。 不能在 Menu 或 Timer 控件上使用 Refresh 方 法。 通常，如果没有事件发生，窗体或控件的绘制是自动处理的。但是，有些情况下希望窗体或控件立即更新。 例如，如果使用文件列表框、目录列表框或者驱动器列表框显示当前的目录结构状态，当目录结构发生变化时可 以使用 Refresh 更新列表。 可以在 Data 控件上使用 Refresh 方法来打开或重新打开数据库（如果 DatabaseName, ReadOnly, Exclusive 或 Connect 属性的设置值发生改变），并能重建控件的 Recordset 属性内的 dynaset。 （6）Show 方法 用以显示 MDIForm 或 Form 对象。 语法：object.Show style, ownerform 说明： 如果调用 Show 方法时指定的窗体没有装载，Visual Basic 将自动装载该窗体。 当 Show 在显示无模式窗体时，随后遇到的代码则要执行。当 Show 在显示模式窗体 (modal form) 时，则 随后的代码直到该窗体被隐藏或卸载时才能执行。 当 Show 在显示模式窗体时，除了模式窗体中的对象之外不能进行输入（键盘或鼠标单击）。对其它窗体 进行输入前程序必须隐藏或卸载模式窗体（通常是处于响应用户某些操作状态）。MDIForm 不能是形式的。

　　在模式窗体显示时，虽然应用程序中的其它窗体失效，但其它应用程序不会失效。 应用程序的启动窗体在其 Load 事件调用后会自动出现。 下面的例子说明如何使用 ownerform 参数： Private Sub cmdShowResults_Click() 显示模式窗体 frmResults. frmResults.Show vbModal, Me End Sub （7）Cls 方法 清除运行时 Form 或 PictureBox 所生成的图形和文本。 语法：object.Cls 说明： Cls 将清除图形和打印语句在运行时所产生的文本和图形， 而设计时在 Form 中使用 Picture 属性设置的背 景位图和放置的控件不受 Cls 影响。如果激活 Cls 之前 AutoRedraw 属性设置为 False， 调用时该属性设置为 True，则放置在 Form 或 PictureBox 中的图形和文本也不受影响。 这就是说，通过对正在处理的对象的 AutoRedraw 属性进行操作，可以保持 Form 或 PictureBox 中的图形和文本。 调用 Cls 之后，object 的 CurrentX 和 CurrentY 属性复位为 0。 3.窗体的常用事件 (1) Load 事件 这个事件发生在窗体被装入内存时，且发生在窗体出现在屏幕之前。窗体出现之前，Visual Basic 会看一看 Load 事件里有没有代码，如果有，那么它先执行这些代码，再让窗体出现在屏幕上。 (2) Click 事件，Dblclick 事件 这两个事件在单击或双击窗体时发生。 不过单击窗体里的控件时， 窗体的 Click 事件并不会发生， Visual Basic 会去看控件的 Click 事件里有没有代码。 (3)Activate (活动事件)与 Deactivate（非活动事件） 显示多个窗体时，可以从一个窗体切换到另一个窗体。每次激活一个窗体时，发生 Activate 事件，而前一 个窗体发生 Deactivate 事件。

　　（4）Resize 事件 在窗体被改变大小时会触发此事件。 4.窗体的控制 (1) 装入或卸出窗体 要装入或卸出窗体，用 Load 或 Unload 语句。 装入窗体： Load formName 卸出窗体： UnLoad formName FormName 变量是要装入或卸出的窗体名。 Load 语句只是把窗体装入内存，并不显示出来，要显示窗体可 以使用窗体的 Show 方法。 (2) 显示或隐藏窗体 要显示或隐藏窗体，用 Show 或 Hide 方法。若尚未装入内存则先装入再显示。 显示窗体： formName.show mode 隐藏窗体： formName.hide FormName 变量是窗体名,可选变元 mode 为 0（缺省值）时窗体为非模态，为 1 时窗体为模态。模态窗体完 全占有应用程序控制权，不允许切换到别的应用程序，除非关闭！而非模态窗体则反之。 （3）END 语句 END 语句的功能是终止应用程序的执行，并从内存卸在所有窗体。 语法是： END 1. 窗体的属性 (1)设置属性的方法 1）在设计态通过属性窗口设置 直接在属性窗口中选择或输入既可。 2）在程序代码中改变属性值 代码中的格式为： 对象名 . 属性 = 属性值

　　例：Form1.BackColor=RGB（255，0，0） 2. 窗体的常用方法 （1）Hide 方法 用以隐藏 MDIForm 或 Form 对象，但不能使其卸载。 语法：object.Hide object 所在处代表一个对象表达式，其值为“应用于”列表中的一个对象。如果省略 object，则带有焦点的窗 体就认为是该 object。 说明： 隐藏窗体时， 它就从屏幕上被删除， 并将其 Visible 属性设置为 False。 用户将无法访问隐藏窗体上的控件， 但是对于运行中的 Visual Basic 应用程序，或对于通过 DDE 与该应用程序通讯的进程及对于 Timer 控件的事 件，隐藏窗体的控件仍然是可用的。 窗体被隐藏时，用户只有等到被隐藏窗体的事件过程的全部代码执行完后才能够与该应用程序交互。 如果调用 Hide 方法时窗体还没有加载，那么 Hide 方法将加载该窗体但不显示它。 （2）Move 方法 用以移动 MDIForm、Form 或控件。 语法：object . Move left, top, width, height Move 方法的语法包含下列部分： 说明：只有 left 参数是必须的。但是，要指定任何其它的参数，必须先指定出现在语法中该参数前面的全部参 数。例如，如果不先指定 left 和 top 参数，则无法指定 width 参数。任何没有指定的尾部的参数则保持不变。 （3）Print 方法 在 Immediate 窗口中显示文本。 语法：object . Print [outputlist] Print 方法的语法具有下列对象限定符和部分：

　　outputlist 参数具有以下语法和部分： {Spc(n) Tab(n)} expression charpos 说明： 可以用空白或分号来分隔多个表达式。 对系统指定的国别设置，用小数点分隔符将所有打印到 Immediate 视窗的数据正确格式化。关键字要用适 用于主应用程序的语言输出。 对于 Boolean 数据，或者打印 True 或者打印 False。根据主机应用程序的地区设置来翻译 True 和 False 关键字。 使用系统能识别的标准短日期格式书写 Date 数据。 当日期或时间部件丢失或为零时， 只书写已提供的部件。 如果 outputlist 数据是 Empty， 则无内容可写。 但是， 如果 outputlist 数据是 Null， 则输出 Null。 在输出 Null 关键字时，要把关键字正确翻译出来。 要把错误数据作为 Error errorcode 输出。在输出 Error 关键字时，要把关键字正确翻译出来。 如果在具有缺省显示空间的模块外使用此方法，则需要 object。例如，如果没有指定对象就在标准模块上调 用此方法，则将导致错误发生，但是，如果在窗体模块上进行调用，则会在窗体上显示“outputlist”。 注意： 因为 Print 方法是按照字符比例进行打印，所以字符数与字符所占据的宽度固定的列的数目无关。 例如，像 “W” 这样的宽字母占据的宽度超过一固定列宽，而像 i 这样的窄字母占据的宽度则较小。考虑到要 使用比平均字符更宽的空间，表列一定要留有足够余地。另外，也可以使用固定间距的字体（像 Courier 字体） 来确保每一字符均只占一列。 （4）PrintFrom 方法 用以将 Form 对象的图象逐位发送给打印机。 语法：object.PrintForm 说明：PrintForm 将打印 Form 对象的全部可见对象和位图。在绘制图形时，如果 AutoRedraw 属性为 True，则在运行时 PrintForm 将打印 Form 对象或 PictureBox 控件上的图形。 PrintForm 所使用的打印机是由操作系统的控制面板中的设置来决定。 2.3 控件 1.常用控件介绍

　　ComboBox 组合框（将列表框和文本框结合在一起） Style 属性 外观属性：取 0 时，系统创建一个带下拉式列表框的组合框；为 1 时，系统创建一个由文本框和列表框直接 组合在一起的简单组合框，可以从列表框中选择，也可以直接在文本框中输入；为 2 时，系统创建一个没有文本 框的下拉式列表框，单击列表框上的按钮才显示文本框，用户不能在文本框中输入，只能在列表框中选择。 Text 属性 其值为用户从列表框中选定的文本或直接输入的文本。 AddItem 方法 添加列表项，使用格式： [ 对象名.] AddItem列表项文本[，插入位置序号] 若不指定位置，则插入到列表末尾。 Clear 方法 删除列表所有项目 RemoveItem 方法 删除列表项，使用格式： [ 对象名 .] RemoveItem 删除项序号 CommandButton 命令按钮 Cancel 属性 取消属性，它为 True 时, 按〖ESC〗即等于单击此按钮。 Default 属性

　　缺省属性，它为 True 时, 按回车键即等于单击此按钮。 Timer 计时器 Interval 属性 两次调用 Timer 事件的事件间隔，用于创建动态效果。 Frame 框架 CheckBox 复选框 OptionButton 选项按钮 Alignment 属性 决定它们的对齐方式，0=左对齐，1=右对齐。 Value 属性 决定它们是否被选中的属性 2.常用控件的使用辨析 (1)文本框和标签的区别： 文本框通常用于向计算机输入信息，而标签通常用于输出信息。文本框是一个十分重要的控件，因为由复选 框和选项按钮向程序输入的信息毕竟只有少数的几条信息而已。 标签和文本框的区别很小， 标签可以看成是一个 在运行时不能修改正文的文本框，因此标签主要用于输出信息。 (2) Label 的 AutoSize 属性和 WordWrap 属性 为了使标签具有垂直伸展和字换行处理，必须设置它的 AutoSize 属性和 WordWrap 属性同时为 True。 AutoSize 属性为 False，WordWrap 属性为 False 时，若标签不够高而 Caption 太长时，Caption 将被切割掉。 AutoSize 属性为 False，WordWrap 属性为 True 时，情况也如此。 AutoSize 属性为 True，WordWrap 属性为 False 时，表示可以水平伸展，但只显示一行信息。 (3) PictureBox 和 Image 的 Stretch 属性和 AutoSize 属性 Image 只有 Stretch 属性，而 PictureBox 只有 AutoSize 属性。 AutoSize 属性设为 True，则 PictureBox 改变自己的大小来适应其中的图形。

　　Stretch 属性设为 True，则 Image 中的图形将改变自己的大小来适应外面的边框。 (4)Frame 框架、CheckBox 复选框、OptionButton 选项按钮的区别： 复选框和选项按钮用于向程序输入信息, 框架用来对复选框和选项按钮进行分组。 复选框选中时会在小方框里打一个钩，选项按钮选中时会在小圆圈里点一个点。

　　1．菜单概述 Windows 中的菜单一般由菜单条、菜单、菜单项、子菜单、弹出式菜单组成。 2．普通菜单的设计 （1）给菜单命名 菜单标题和菜单命令也有 Caption 和 Name 属性，设置了这两个属性就等于创建了菜单。Name 是一个抽象名称，Caption 是屏 幕上可见的，可在 Caption 里加入 “&” 来设置热键。 （2）增加和删除菜单 在 Menu Editor 中部有三个命令钮分别是下一个、插入、删除。插入可用来增加新的菜单。在这三个键下面的 Caption 列表框 里选中菜单项（这时它的底色就变成深蓝色），单击插入键，Visual Basic 将上一个增亮菜单下推并增亮一空行，就可以输入新菜 单名和标题了。删除键可用来删掉菜单。选中要删掉的菜单，单击 Delete 键就可以删掉它了。 （3）移动菜单标题 有四种情况：向上移动，向下移动，向左缩排，向右缩排，选中某一菜单标题，安上下箭头，则这个菜单将上下移动到你喜欢 的位置上，这也决定了它在界面中的位置。如果按左右箭头，情况则有所不同。由于菜单是分级的，所以，如果它没有缩排，则它 是一个菜单标题；如果它缩排一次，那么它将变成一个菜单命令；如果缩排两次，那么它将成为一个子菜单命令。VB 里可以总共 设计四层子菜单。 （4）设置分离条 分离条是指在菜单中将命令分组的线，VB 将分离条也看成一个菜单项，它也需要 Caption 和 Name 属性，而且也有其它属性， 分离条与菜单项的区别是分离条的 Caption 属性必须是连字号即减号。也就是，当设置了一个 Caption 属性为 “-” 的菜单项时，实 际上就设置了一个分离条，分离条的名字可以是 barFile1 之类，以表明分离条的位置。 （5） 菜单的各种简单属性 在菜单编辑器里有许多确认框和一些文本框及一个下拉式的列表框，这些决定了菜单的各种属性BOB体验官网。 1) Checked 复选属性

　　这个属性值设置为真，将在菜单命令左边产生一个打勾的确认标志。 2) Enabled 有效属性 各种各样的用户会产生千奇百怪的操作，在许多 Edit 菜单里都会有不同形式的让菜单命令模糊的情况。Enabled 属性为真，则菜 单命令是清晰的，Enabled 属性为假，则菜单命令是模糊的，这时用户就不能选中这个菜单项了。 3) Visible 可见属性 对暂时不用的菜单， 如果把 Visible 属性设为假，则菜单根本不会出现在屏幕上。这样做比把 Enabled 属性设为假显得更加干脆！ 4) Index 属性 可以生成菜单命令数组，用索引号区分开。例如向 File 菜单中添加一系列最近打开的文件名。添加菜单可用 Load 方法。以上 属性可以在运行时设置，形成动态的菜单的情况。 例如：

　　BOB体验官网

　　mnuUndo.Enabled = False mnuProperty.Visible = False 还可以改变 Caption 等属性。 mnuUndo.Caption = “Redo” 3. 生成弹出式菜单（或浮动菜单） 几乎每个 Windows 应用程序都提供弹出式菜单，用户可以右键单击窗体或控件取得这个菜单。弹出式菜单也属于普通菜单， 只是不固定在窗体上，而是可以在任何地方显示。 弹出式菜单用 PopupMenu 方法调用。假设已经用菜单编辑器生成了名为 mnuedit 的菜单，则可以在 MouseUp 事件加入如下代 码就可以生成弹出式菜单：

　　2.5 设计状态条、工具栏、进程条等 1．创建状态条 选中状态条，按 F4 键进入属性窗口，双击（Custom）可以进入主要的设置窗口 SBarCtrl 属性窗口。 （1） 选择面板形状 在 SBarCtrl 属性窗口里选择 General 标签，在 Style 列表框里选择多面板（缺省形式）或单面板简单文本形 式。

　　(3) 取得列表框/组合框的数据 可以通过取得 Text 属性或通过取得 ListIndex 属性来判断哪一项被选择了。ListIndex 属性的值也同样是第一 个为 0，第二个为 1……如： If List1.Text = “Visual Basic” Then Instructions If List1.ListIndex = 1 Then Instructions 组合框有时允许用户自己输入数据，这时所输入数据的 ListIndex 值为－1。 4. 通过滚动条 Scroll Bar 取得数据 在 Visual Basic 的工具箱里有两种滚动条：一种是垂直的，一种是水平的，它们的差异无非是摆放的方向不 一样。 (1) 滚动条的主要属性及事件 1）Min，Max 属性 Min 属性决定滚动条最左端或最顶端所代表的值。Max 属性决定滚动条最右端或最下端所代表的值。 2）LargeChange,SmallChange 属性 SmallChange 决定在滚动条两端的箭头钮上单击时改变的值。LargeChange 决定在滑块上方或下方区域单击 时改变的值。 3）Value 属性 Value 属性代表当前滑块所处位置的值，这个值由滑块的相对位置决定。 4）Change 事件 当滑块位置发生变化时就引发了 Change 事件。 (2) 取得滚动条的数据 滚动条并不是一个数据输入的好控件， 因为无法从滚动条上直接看出输入的数据， 但它的优点是可以表示一 定范围里的相对位置。为了得到数据，只要取得滚动条的 Value 属性就可以了。 5. InputBox 函数 InputBox 函数提供一个简单的对话框供用户输入信息。在把其它版本的 BASIC 程序移植到 Visual Basic 时， InputBox 函数通常用来代替 INPUT 语句。这个对话框的样子基本上是上面的样子。 它的完整语法是：x = InputBox (prompt, title, default, xpos, ypos, helpfile, context) 其中，prompt 是提示的字符串，这个参数是必须的。title 是对话框的标题，是可选的。default 是文本框里的 缺省值，也是可选的。xpos，ypos 决定输入框的位置。helpfile，context 用于显示与该框相关的帮助屏幕。返回 值 x 将是用户在文本框里输入的数据， 是一个字符串类型的值。 x 如果用户按了 Cancel 钮， x 将为空字符串。 则 2.7 Visual Basic 的输出机制 作为输出的对象，Visual Basic 提供了标签，文本框，窗体，图片框（Picture Box）等用于输出，而且 Visual Basic 里也有一堆命令、 属性涉及信息的输出， 较常用的有： MsgBox 函数， Print 方法， 方法， Cls Tab 函数， Format

　　例如：Action = MsgBox (“Are you girl?”, vbYesNo vbQuestio“Question”)。使用这个函数时 Visual Basic 将产 生一个标题为 Question，具有问号和 Yes，No 按钮的消息框。作为一个函数，本质上还是要返回值的，MsgBox 的返回值确定了用户的选择，程序可根据返回值做出相应的动作。 2. Print 方法，Cls 方法，Tab 函数 (1) Print 方法 Print 方法的语法是：object. Print expressionlist object 表示 Print 作用的对象，比如是 Form 或者是 Picture Box，object 是可以省略的，省略时的 Print 往往在 窗体上输出。expressionlist 是输出的内容，允许许多项数据的输出，在数据间可以加入“,”或”;”。加入分号将使下 一数据项紧挨着上一数据项输出。而加入逗号，则 Visual Basic 将下一数据项在下一打印区输出，其实就是空了 几个空格后再输出。两个打印区之间有 14 个字符的宽度，其实这也很难衡量，比如 14 个“W”所占的宽度大概是 14 个“i”所占宽度的三倍多。幸好中国日本之类的方块字所占的宽度基本上是一样的，所以较好处理一些。 (2) Tab 函数 Tab 函数只用在 Print 方法中，它用来移动下一个字符到打印位置，这将省去数空格的功夫。语法是：Tab (column) Tab 函数将 Visual Basic 自定义的 14 字符宽的打印区扔到一边，用自己的方式定义了新的灵活的打印区宽 度。 (3) Cls 方法 Cls 也是一个古老的 BASIC 语句,原来它的作用总是把屏幕变成黑色， 然后在左上角或左下角闪烁一个光标， Visual Basic 里它的作用是清除绘图语句和 Print 语句产生的文字和图形。

　　语法是：object. Cls object 指清除的对象，可以是 Form 或 Picture Box。如果 object 省略，通常 Visual Basic 都把当前的窗口作为 Cls 操作的对象。 3. Format 函数 Format 函数用于制定字符串或数字的输出格式。语法是：x = Format (expression,fmt) expression 是所输出的内容。 是指输出的格式， fmt 这是一个字符串型的变量， 这一项若省略的话， 那么 Format 函数将和 Str 函数的功能差不多。 3.1 VB 编码规则 1. 语言元素 VB 的语言基础是 BASIC 语言，VB 程序的语言元素主要由： 关键字（如： Dim、Print、Cls） 函数（如：Sin（）、Cos（）Sqr（）） 表达式（如：Abs(-23.5)45*20/3 ） 语句（如：X=X5 、 IF……ELSE……END IF）等组成。 2. VB 代码书写规则 （1） 程序中不区分字母的大小写，Ab 与 AB 等效； （2） 系统对用户程序代码进行自动转换： 1） 对于 VB 中的关键字，首字母被转换成大写，其余转换成小写 2） 若关键字由多个英文单词组成，则将每个单词的首字母转换成大写 3） 对于用户定义的变量、过程名，以第一次定义的为准，以后输入的自动转换成首次定义的形式 3. 语句书写规则 （1）在同一行上可以书写多行语句，语句间用冒号(：)分隔 （2）单行语句可以分多行书写，在本行后加续行符：空格和下划线. 程序的注释方式 （1）整行注释一般以 Rem 开头，也可以用撇号 ； （2）用撇号 引导的注释，既可以是整行的，也可以直接放在语句的后面，最方便； （3）可以利用“编辑”工具栏的“设置注释块”、“解除注释块”来将设置多行注释。

　　5. 保留行号和标号 VB 源程序接受行号与标号，但不是必须的（早期的 BASIC 语言中必须用行号）。 标号是以字母开始以冒号结束的字符串，一般用在 GOTO 语句（现在很少用）中。 3.2 VB 的语言基础 1.数据类型 1）VB 中对没有声明的变量其缺省的数据类型是变体型，可以用来存储各种数据，但所占用的内存比其它 类型都多。为提高运行效率(整型效率较高)，或达到一定的运算精确度（浮点型精度较高，但运行较慢）BOB体验官网，应合 理的定义数据类型。 2） 逻辑型数据只有 True 和 False 两个值，转换成整型时，True=-1 ，False=0，将其它类型转换成逻辑型 时，非 0 数转换为 True ，0 转换为 False。 3） 字符型可以包括所有的西文字符和汉字，字符必须用双引号括 起来, 如：abc123 4）日期型数据按 8 字节的浮点数来存储，日期型数表示方式有两种：可以用号码符#括起来，也可以用数字 序列表示（小数点左边的数字代表日期，右边代表时间，0 为午夜，0。5 为中午 12 点，负数表示是 1899 年 12 月 31 日前的日期和时间）。 如：#3/22/2002# Dim T As Date T=-2.5 Print T 打印出来的结果是 1899-12-28 12：00：00 ５）任何数据类型的数组都需要 20 个字节的内存空间，加上每一数组维数占 4 个字节，再加上数据本身 所占用的空间。数据所占用的内存空间可以用数据元数目乘上每个元素的大小加以计算。例如，以 4 个 2 字节 之 Integer 数据元所组成的一维数组中的数据，占 8 个字节。这 8 个字节加上额外的 24 个字节，使得这个数 组所需总内存空间为 32 个字节。 2. 变量与常量 （1）变量或常量的命名规则 1） 必须以字母或汉字开头，由字母、汉字、数字或下划线） 不能使用 VB 中的关键字，并尽量不与 VB 中标准函数名同名；如：Dim 、Sin 3）VB 中不区分变量的大小写，一般变量首字母用大写，其余用小写；常量全部用大写字母表示 4）为了增加程序的可读性，可在变量名前加一个缩写的前缀来表明该变量的数据类型。 （2）变量声明 1）用 Dim 语句进行显式声明 语句形式： Dim 变量名 [As 类型] 如： Dim intX As integer 说明：· 如果没有 As 类型，则默认为变体类型。 · 可在变量名后加类型符来代替 As 类型 如： Dim intX% · 一条语句可以同时定义多个变量，但每个变量必须有自己的类型声明，类型声明不能共用； · 字符串变量根据其存放的长度是否固定，定义方法不同： 定长字符串： Dim strA As String*10 表示最多存放 10 个字符，如果赋值不足 10 个，则右补空；若多于 10 个，则多余部分截去。 不定长字符串：Dim strA As String ‟最多可存放 2MB 个字符 #2002-3-22 14:30:20#

　　2） 隐式声明 VB 中允许变量不经过声明就直接使用，这种称为隐式声明，所有隐式声明的变量都是变体型的。 隐式声明容易造成错误，为了调试程序方便，一般对使用的变量都进行声明，可以在通用声明段使用 Option Explicit 语句来强制显式声明所有变量。 （3）常量 1）直接常量 指在程序中直接给出值的数据，如：123、123&、123.45、1.234E2 、123D3 分别表示整型、长整型、单精 度浮点型（小数形式）、单精度浮点型（指数形式）、双精度浮点型。 八进制常数： 在数值前加&O ，如 &O123 十六进制常数：在数值前加&H ，如&H123 2）用户声明的符号常量 用 Const 来声明： Const 符号常量名 [As 类型] = 表达式 如：Const PI=3.14159 Const COUNT#=45.67 3）系统提供的常量 系统定义的常量位于对象库中，在对象浏览器中的 Visual Basic（VB）和 Visual Basic for Aplication（VBA） 等对象库中列出了 VB 的常量。这些常量可以与应用程序的对象、方法、属性一起使用。 如：Form1.WindowsState=vbMaximized 表示将窗口极大化。 3. 运算符 声明了常量 PI，代表 3.14159，单精度型 声明了常量 COUNT，代表 45.67，双精度型 Const MAX As Integer=&O144 声明了常量 MAX，代表八进制数 144，整型

　　（1）算术运算符 算术运算符两边的操作数应该是数值型，若是数字字符或逻辑型，则自动转换为数值类型后再运算。 （2）字符串运算符 （3） 关系运算符

　　1）如果两个操作数都是数值型，则按其大小比较 2） 如果两个操作数都是字符型，则按字符的 ASCII 码值从左到右一一比较 3） 汉字字符大于西文字符 4） 关系运算符的优先级相同 5） VB6.0 中 Like 运算符与通配符的使用： ？——表示任何单一字符 *——表示 0 个或多个字符 #——表示任何一个数字（0 - 9） [字符列表]——表示字符列表中的任何单一字符 [！字符列表]—— 表示不在字符列表中的任何单一字符 （4） 逻辑运算符

　　1）若有多个条件时，And 必须全部条件为真才为真； Or 只要有一个条件为线）如果逻辑运算符对数值进行运算，则以数字的二进制值逐位进行逻辑运算。And 运算常用于屏蔽某些位； Or 运算常用于把某些位置 1。 如：12 And 7 表示对 1100 与 0111 进行 And 运算，得到二进制值 100，结果为十进制 4。 3）对一个数连续进行两次 Xor 操作，可恢复原值。在动画设计中，用 Xor 可恢复原来的背景。 4.表达式 （1）表达式的组成 表达式由常量、变量、运算符、函数和圆括号按一定的规则组成，通过运算后有一个结果，运算结果的类型 由数据和运算符共同决定。 （2）表达式的书写规则 1）乘号不能省略 2）括号必须成对出现，均使用圆括号，可以嵌套，但必须配对。 3）表达式从左到右在同一基准上书写，无高低、大小之分。 例：sqr((3*xy)-z)/(x*y)^4 （3）不同数据类型的转换 操作数的数据类型应该符合要求，不同的数据应该转换成同一类型。在算术运算中，如果操作数的数据精度 不同，VB 规定运算结果采用精度较高的数据类型。 （4）优先级 同一表达式中，不同运算符的优先级是：算术运算符 字符运算符 关系运算符 逻辑运算符 注意：对于存在多种运算符的表达式，可增加圆括号改变优先级或使表达式更清晰。 4.1 算法概论 1．算法的概念 算法：指用计算机解决某一问题的方法和步骤。 算法分类： 数值算法：用于解决一般数学解析方法难以解决的问题，如：求超越方程的根、求定积分、解 微分方程等。 非数值算法：用于对非数值信息进行查找、排序等。 数值算法：用于解决一般数学解析方法难以解决的问题，如：求超越方程的根、求定积分、解微分方程等。 非数值算法：用于对非数值信息进行查找、排序等。 2．算法的特征

　　（1）确定性：指算法的每个步骤都应确切无误，没有歧义。 （2）可行性：指算法的每个步骤必须是计算机能够有效执行、可以实现的，并可得到确定的结果。 （3）有穷性：指一个算法应该在有限的时间和步骤内可以执行完毕的。 （4）输入性：指一个算法可以有 0 或多个输入数据。 （5）输出性：指一个算法必须有一个或多个输出结果。 3．算法的评价 主要评价指标是：算法是否正确、运行的效率、占用系统资源的多少。 4．算法的描述 一般常用流程框图来描述算法。 5.基本算法结构 “结构化程序设计方法”规定算法有三种基本结构： 顺序结构、选择结构和循环结构 6．算法示例 （1）欧几里德算法——求两个自然数的最大公约数 （2）顺序查找算法—— 在 N 个字符串集合中，查找有无特定的字符串存在

　　4.2 顺序结构 1. 赋值语句 赋值语句是任何程序设计中最基本的语句，赋值语句都时顺序执行的。赋值语句的形式为： 变量名 = 表达式 它的作用是计算右边表达式的值，然后赋给左边的变量，表达式的类型应该与变量名的类型一致。 2. 使用说明 （1）当表达式为数值型而与变量精度不同时，强制转换成左边变量的精度； （2）当表达式是数字字符串，左边变量是数值类型，自动转换成数值类型再赋值，但当表达式中有非数字字符或空串，则出 错。 （3）任何非字符类型赋值给字符类型，自动转换为字符类型； （4）当逻辑型赋值给数值型时，True 转换为 -1，False 转换为 0；反之，非 0 转换为 True，0 转换为 False； （5）赋值号左边的变量只能是变量，不能是常量、常数符号、表达式，否则报错； （6）不能在一句赋值语句中，同时给各变量赋值； （7）在条件表达式中出现的 = 是等号，系统会根据 = 号的位置，自动判断是否为赋值号； （8）注意 N=N1 是累加中常见的赋值语句，表示将 N 变量中的值加 1 后再赋值给 N。

　　3）并不是所有的多分支结构都可以用情况语句代替的。 例：已知输入某课程的百分制成绩 mark，要求显示对应五级制的评定，评定条件如下：

　　3. 条件函数 （1）if 函数 函数形式： Iif（表达式，当条件为 True 时的值，当条件为 False 时的值．例：求 X、Y 中大的数，并放入 变量 Tmax 中： Tmax=Iif（XY, X, Y） （2）Choose 函数 函数形式：Choose（整数表达式，选项列表） 如果整数表达式的值是 1， 则选择列表中的第 1 项， 依次类推； 如果小于 1 或大于列表项数时， 则返回 NULL。 例： 根据 nub 为 1 -4 的值，换算成不同的运算符： OP= Choose（nub,“＋”，“－”，“×”，“†”） 4.4 循环结构 循环是在指定的条件下多次重复执行一组语句。VB 中提供了两种类型的循环语句： 计数循环语句和条件型循环语句 1. For 循环语句（知道循环次数的计数型循环） 语句形式： For 循环变量 = 初值 To 终值 [ Step 步长] 语句块 [Exit For] 语句块 Next 循环变量

　　说明: 1） 循环变量必须为数值型 2）步长一般为正，初值小于终值；若为负，初值大于终值；缺省步长为 1； 3）语句块可以是一句或多句语句，称为循环体； 4）Exit For 表示当遇到该语句时，退出循环体； 执行 Next 的下一句； 循环次数=int（（终值 - 初值）/步长1） 5）退出循环后，循环变量的值保持退出时的值； 6）在循环体内对循环变量可多次引用，但不要对其赋值，否则影响结果。 2. Do……Loop 循环（不知道循环次数的条件型循环） 是用于控制循环次数未知的循环结构，语法形式有两种： 形式 1：Do While …… Loop Do [ While Until 条件 ] 语句块 [ Exit Do ] 语句块 Loop 形式 2：Do …… Loop While Do 语句块 [ Exit Do ] 语句块 Loop [ While Until 条件 ] 说明： 1）形式 1 为先判断后执行，有可能一次也不执行； 2）形式 2 为先执行后判断，至少执行一次； 3）关键字 While 用于指明条件为真时就执行循环体中的语句，Until 刚好相反； 4）当省略了 WhileUntil 条件字句，即循环结构仅由 Do……Loop 关键字构成时，表示无条件循环，这时循 环体内应该有 Exit Do 语句，否则为死循环； 5）Exit Do 语句表示当遇到该语句时，退出循环，执行 Loop 的下一语句。 3. 循环的嵌套 指在循环体内又包含了一个完整的循环结构。循环嵌套对 For 循环和 Do……Loop 循环均适用。 4.5 其它辅助控制语句 1．Go To 语句 语句形式： Go To 标号 行号

　　说明：（1）Go To 语句只能转移到同一过程的标号或行号处；标号是一个字符系列，首字符必须为字母， 与大小写无关，任何转移到的标号后面必须有冒号： ；行号是一个数字序列； （2）以前 BASIC 中常用此语句，可读性差；现在要求尽量少用或不用，改用选择结构或循环结构来代替。 2．Exit 语句 用于退出某控制结构的执行，VB 的 Exit 语句有多种形式，如： Exit For （退出 For 循环） Exit Do （退出 Do）循环） Exit Sub （退出子过程） Exit Function（退出函数） 3．End 语句 独立的 End 语句用于结束一个程序的执行，可以放在任何事件过程中，形式为：End VB 的 End 语句还有多种形式，用于结束一个过程或块，如： End If， End With， End Type， End Select，End Sub， End Function 4．With 语句 它的作用是可以对某个对象执行一系列的语句，而不用重复指出对象的名称。但不能用一个 With 语句设置 多个不同的对象。属性前面需要带点号“· ”。 语句形式如下： With 对象名 语句块 End With 例：With form1 . Height=3000 . Width=4000 . BackColor=RGB(255,0,0) End With 4.6 程序调试 1．VB 的调试工具 （1）设置自动语法检查 打开工具菜单 → 单击选项命令 → 选择 编辑器 页面 →将 自动语法检测 勾上。 （2）利用 VB 调试工具栏 利用该工具栏可以运行程序、中断运行、在程序中设置间断点、监视变量、单步调试、过程跟踪等操作。 2． VB 的三种模式

　　（1）设计模式 在设计模式下可以进行程序的界面设计、属性设置、代码编写等，标题栏上显示“设计”，在此模式下不能运 行程序，也不能使用调试工具。 （2）运行模式 执行“运行”菜单中的“启动”命令或单击工具栏上的启动按钮或按 F5 键，即由设计模式进入运行模式，标题 栏显示“运行”，在此阶段可以查看程序代码，但不能修改。若要修改，必须单击工具栏上的“结束”按钮，回到设 计模式，也可以选择“中断”按钮，进入中断模式。 （3）中断模式 当程序运行时单击了“中断”按钮，或当程序出现运行错误时，都可以进入中断模式，在此模式下，运行的程序被 挂起，可以查看代码、修改代码、检查数据。修改结束，单击“继续”按钮可以继续程序的运行，也可以单击“结 束”按钮停止程序的执行。 3. 常见错误 （1） 编辑时错误 当用户在代码窗口编辑代码时，VB 会对程序进行语法检查，当发现语句没有输完、关键字输错等情况时， 系统会弹出对话框，提示出错，并在错误处加亮显示，以便用户修改。 （2）编译时错误 是指用户单击了“启动”按钮，VB 开始运行程序前，先编译执行的程序段时产生的错误，此错误是由于用户 未定义变量、遗漏关键字等原因而产生的。发现错误时系统会停止编译，提示用户修改。 （3）运行时错误 指 VB 在编译通过后，运行代码时发生的错误，一般是由于指令代码执行了非法操作引起的，如：数据类型 不匹配、试图打开一个不存在的文件等。系统会报错并加亮显示、等候处理。 （4）逻辑错误 如果程序运行后得不到所希望的结果，则说明存在逻辑错误。如：运算符使用不正确，语句的次序不对、循 环语句的起始、终值不正确。这种错误系统不会报错，需要用户自己分析判断。 4.程序调试方法 （1）进入/退出中断状态 进入中断状态有四种方法： 1） 程序运行时发生错误自动进入中断 2） 程序运行中用户按中断键强制进入中断 3） 用户在程序中预先设置了断点，程序执行到断点处即进入中断状态 4） 在采用单步调试方式，每运行一个可执行代码后，即进入中断状态。 （2） 利用调试窗口 1) 立即窗口 这是调式窗口中使用最方便、最常用的窗口。可以在程序中用 Debug.Print 方法，把输出送到立即窗口，也 可以在该窗口中直接使用 Print 语句或？显示变量的值。

　　2) 本地窗口 该窗口显示当前过程中所有变量的值， 当程序的执行从一个过程切换到另一个过程时， 该窗口的内容发生改 变，它只反映当前过程中可用的变量。 3) 监视窗口 该窗口可显示当前的监视表达式，在此之前必须在设计阶段，利用调试菜单的“添加监视命令”或“快速监视” 命令添加监视表达式以及设置的监视类型在运行时显示在监视窗口，根据设置的监视类型进行相应的显示。 （3）插入断点和逐句跟踪 在调试程序时，通常回设置断点来中断程序的运行，然后逐句跟踪检查相关变量、属性和表达式的值是否在 预期的范围内。 可在中断模式下或设计模式时设置或删除断点， 在代码窗口选择怀疑存在问题的地方作为断点， 按下 F9 键， 则程序运行到断点处即停下，进入中断模式，在此之前所关心的变量、属性、表达式的值都可以看到。 5.1 数组的概念

　　1．引例 求 100 个学生的平均成绩及超过平均成绩的人数。 如果用一般变量来表示成绩，需要用 100 个变量，如：mark1、mary2、……mark100。若用数组，可以只用 一个来表示 mark（1 To 100）。 2．基本概念 数组：是同类型变量的一个有序的集合。 如：A（1 To 100），表示一个包含 100 个数组元素的名为 A 的数组。 数组元素： 即数组中的变量。用下标表示数组中的各个元素。 表示方法：数组名（P1，P2，……） 其中 P1、P2 表示元素在数组中的排列位置，称为“下标”。 如：A（3，2）代表二维数组 A 中第 3 行第 2 列上的那个元素。 数组维数： 由数组元素中下标的个数决定，一个下标表示一维数组，二个下标表示二维数组。 VB 中有一维数组、二维数组、……最多 60 维数组。 下标： 下标表示顺序号，每个数组有一个唯一的顺序号，下标不能超过数组声明时的上、下界范围。下标 可以是整型的常数、变量、表达式，甚至又是一个数组元素。 下标的取值范围是：下界 To 上界 ，缺省下界时，系统默认取 0。

　　3．数组声明 数组必须先声明后使用。声明数组就是让系统在内存中分配一个连续的区域，用来存储数组元素。 声明内容：数组名、类型、维数、数组大小。 一般情况下，数组中各元素类型必须相同，但若数组为 Variant 时，可包含不同类型的数据。 静态数组：声明时确定了大小的数组。 动态数组： 声明时没有给定数组大小 （省略了括号中的下标） ，使用时需要用 ReDim 语句重新指出其大小。 使用动态数组的优点是根据用户需要，有效地利用存储空间，它是在程序执行到 ReDim 语句时才分配存储 单元，而静态数组是在程序编译时分配存储单元。

　　1. 动态数组的建立与声明 建立动态数组的方法是：利用 Dim、Private、Public 语句声明括号内为空的数组，然后在过程中用 ReDim 语 句指明该数组的大小。语法是： ReDim 数组名（下标 1[，下标 2…]） [As 类型] 其中下标可以是常量，也可以是有了确定值的变量，类型可以省略，若不省略，必须与 Dim 中的声明语句 保持一致。 例： Dim D（） As Single Sub Form_Load（） …… ReDim D（4，6） …… End Sub 2．注意事项 （1）在动态数组 ReDim 语句中的下标可以是常量，也可以是有了确定值的变量。 （2）在过程中可以多次使用 ReDim 来改变数组的大小，也可改变数组的维数。 （3）每次使用 ReDim 语句都会使原来数组中的值丢失，可以在 ReDim 语句后加 Preserve 参数来保留数组 中的数据，但使用 Preserve 只能改变最后一维的大小，前面几维大小不能改变。 1. 给数组元素赋初值 （1） 利用循环结构

　　注意：（1）赋值号两边的数据类型必须一致； （2）如果赋值号左边的是一个动态数组，则赋值时系统自动将动态数组 ReDim 成右边相同大小的数 组； （3）如果赋值号左边的是一个大小固定的数组，则数组赋值出错。 4．数组的输出 用 For……Next 循环语句输出。 5．求数组中最大元素和所在下标及各元素之和 求数组中最大元素及下标，一般假设第一个元素及下标为最大，然后将该数与数组中的其他元素逐一比较， 若有比其大的就替换，同时替换下标。 6．交换数组中各元素 交换的要求是将数组第一个元素与最后一个交换，第二个与倒数第二个交换，依次类推。 5.5 控件数组 1．控件数组的概念 控件数组是由一组相同类型的控件组成的，它们共用一个控件名，具有相同的数组。控件数组适用于若干个 控件执行的操作相似的场合，控件组共享同样的事件过程。控件数组通过索引号（属性中的 Index）来标识各控 件，第一个下标是 0 。如：Text1(0)、Text1(1)、Text1(2)、Text1(3)…… 2．控件数组的建立 （1）在设计时建立 步骤：1）在窗体上画出某控件，并进行属性设置。 2）选中该控件进行“复制”和“粘贴”操作，系统提示“是否建立控件数组”，选择是即可。多次粘贴就 可以创建多个控件元素。 3）进行事件过程的编程。 （2）运行时添加控件数组 方法：1）在窗体上画出某控件，设置该控件的 Index 值为 0，表示该控件为数组。 2）在编程时通过 Load 方法添加其余若干个元素，也可以通过 Unload 删除某个添加的元素。 3）每个添加的控件数组通过 Left 和 Top 属性，确定其在窗体上的位置，并将 Visible 设置为 True。 使用示例： 建立一个类似国际象棋的棋盘， 要求黑白交替， 运行时单击某个棋格， 会改变颜色并显示其序号。 5.6 自定义数据类型 1. 自定义数据类型的定义

　　是指由若干标准数据类型组成的一种复合类型，也称为记录类型。 （1）定义方式： Type 自定义类型名 元素名[（下标）] As 类型名 …… 元素名[（下标）] As 类型名 End Type 元素名：表示自定义类型中的一个成员 下标（可选） ：表示是数组 类型名：为标准类型 例：定义一个学生信息的自定义类型： Type studtype No As Integer ‟ 定义学号 Name As String*10 ‟ 定义姓名 Sex As String*2 ‟ 定义性别 Mark(1 TO 4) As Single ‟ 定义 4 门课程的成绩 Total As Single ‟ 定义总分 End Type （2）注意事项 1）自定义类型一般在标准模块（.bas）中定义，默认是 Public 2）自定义类型中的元素可以是字符串,但应是定长字符串 3) 不可把自定义类型名与该类型的变量名混淆 4) 注意自定义类型变量与数组的差别：它们都由若干元素组成，前者的元素代表不同性质、不同类型的数 据，以元素名表示不同的元素；后者存放的是同种性质、同种类型的数据，以下标表示不同元素。 2. 自定义型变量的声明和使用 使用形式： Dim 变量名 As 自定义类型名 例如： Dim student As studtype, mystud As studtype 自定义类型中元素的表示方法是：变量名 . 元素名 如：student.mark(4) 为了简单起见，可以用 With …… End With 语句进行简化。 例： With student .no=99001 .name=

　　.sex= .total=0 for I=1 to 4 .mark(I)=int(rnd*101) ‟随机产生 0 - 100 之间的分数 .total=.total.may(I) next I End With Mystud=student ‟ 同种自定义类型变量可以直接赋值 3.自定义类型数组的使用 自定义类型数组就是数组中的每个元素都是自定义类型。 例如：自定义一个由学生姓名、成绩组成的学生记录类型，用来存放 100 个学生的记录。 6.1VB 的过程设计及子过程（Sub）的定义与调用 1．什么是过程 在程序设计中，为各个相对独立的功能模块所编写的一段程序称之为过程。 2．VB 中的自定义过程分类 （1）以“Sub”保留字开始的子程序过程 （包括事件过程和通用过程），不返回值； （2）以“Function” 保留字开始的函数过程，返回一个值； （3）以“Property” 保留字开始的属性过程，可以返回和设置窗体、标准模块以及类模块的属性值，也可以 设置对象的值。 3． 事件过程 （1）窗体事件过程 语法：Private Sub Form_事件名（[参数列表]） [局部变量和常数声明] 语句块 End Sub 注意： 1）窗体事件过程名由 Form_事件名组成，多文档窗体用 MDIForm_事件名； 2）每个窗体事件过程名前都有一个 Private 的前缀，表示该事件过程不能在它自己的窗体模块之外被调用；

　　3）事件过程有无参数，完全由 VB 提供的具体事件本身决定，用户不可以随意添加。 （2）控件事件过程 语法：Private Sub 控件名_事件名（[参数列表]） [局部变量和常数声明] 语句块 End Sub 注意：其中的控件名必须与窗体中某控件相匹配，否则 VB 将认为它是一个通用过程。 （3）建立事件过程的方法 1）打开代码编辑器窗口（两种方法：双击对象或从工程管理器中单击“查看代码”按钮） 2）在代码编辑器窗口中，选择所需要的“对象”和“事件过程” 3）在 Private Sub …… End Sub 之间键入代码 4）保存工程和窗体 （4）事件过程的调用 事件过程由一个发生在 VB 中的事件来自动调用或者由同一模块中的其他过程显示调用。 2．通用过程 通用过程是一个必须从另一个过程显示调用的程序段， 通用过程有助于将复杂的应用程序分解成多个易于管 理的逻辑单元，使应用程序更简洁、更易于维护。 通用过程分为公有（Public）过程和私有（ Private）过程两种，公有过程可以被应用程序中的任一过程调用， 而私有过程只能被同一模块中的过程调用。 （1）定义方法： [ Private Public ] [ Static] Sub 过程名（[参数列表]） [局部变量和常数声明] „用 Dim 或 Static 声明 语句块 [Exit Sub] 语句块

　　End Sub 注意： 1）缺省[ Private Public ]时，系统默认为 Public ； 2）Static 表示过程中的局部变量为“静态”变量； 3）过程名的命名规则与变量命名规则相同，在同一个模块中，同一符号名不得既用作 Sub 过程名，又用作 Function 过程名。 4）参数列表中的参数称为形式参数，它可以是变量名或数组名，只能是简单变量，不能是常量、数组元素、 表达式；若有多个参数时，各参数之间用逗号分隔，形参没有具体的值。VB 的过程可以没有参数，但一对圆括 号不可以省略。不含参数的过程称为无参过程。 形参格式为： [ ByVal ] 变量名[（）] [As 数据类型] 式中： 变量名[（）]：变量名为合法的 VB 变量名或数组名，无括号表示变量，有括号表示数组。 ByVal ：表明其后的形参是按值传递参数（传值参数 Passed By Value），若缺省或用 ByRef教程知识，则表明参数 是按地址传递的（传址参数）或称“引用”（Passed By Reference）。 As： 数据类型：缺省表明该形参是变体型变量，若形参变量的类型声明为 String，则只能是不定长的。而在 调用该过程时，对应的实在参数可以是定长的字符串或字符串数组，若形参是数组则无限制。 5）Sub 过程不能嵌套定义，但可以嵌套调用。 6） End Sub 标志该过程的结束，系统返回并调用该过程语句的下一条语句。 7） 过程中可以用 Exit Sub 提前结束过程，并返回到下调用该过程语句的下一条语句。 （2）建立 Sub 过程的方法 方法一： 1）打开代码编辑器窗口 2）选择“工具”菜单中的“添加过程” 3）从对话框中输入过程名，并选择类型和范围 4）在新创建的过程中输入内容

　　方法二： 1）在代码编辑器窗口的对象中选择“通用”，在文本编辑区输入 Private Sub 过程名 2）按回车键，即可创建一个 Sub 过程样板 3）在新创建的过程中输入内容 3．Sub 子过程的调用 （1） 用 Call 语句调用 Sub 过程 语法：Call 过程名（实在参数表） 实在参数的个数、类型和顺序，应该与被调用过程的形式参数相匹配，有多个参数时，用逗号分隔。 （2）把过程名作为一个语句来用 语法：过程名 [实参 1[，实参 2……]] 它与（1）的不同点是：去掉了关键字和实参列表的括号 如上例中可以改成：area a,b,c,w 6.3 参数的传递 1．形参与实参的概念 形参：指出现在 Sub 和 Function 过程形参表中的变量名、数组名，过程被调用前，没有分配内存，其作用 是说明自变量的类型和形态以及在过程中的角色。形参可以是： 1）除定长字符串变量之外的合法变量名； 2）后面跟（）括号的数组名。 实参：是在调用 Sub 和 Function 过程时，传送给相应过程的变量名、数组名、常数或表达式。在过程调用 传递参数时， 形参与实参是按位置结合的， 形参表和实参表中对应的变量名可以不必相同， 但位置必须对应起来。 形参与实参的关系： 形参如同公式中的符号， 实参就是符号具体的值； 调用过程： 即实现形参与实参的结合， 也就是把值代入公式进行计算。 2． 按值传递参数（定义时加 ByVal） 按值传递参数（Passed By Value）时，是将实参变量的值复制一个到临时存储单元中，如果在调用过程中改 变了形参的值，不会影响实参变量本身，即实参变量保持调用前的值不变。 3．按地址传递参数（定义时没有修饰词或带关键字 ByRef）

　　按地址传递参数时，把实参变量的地址传送给被调用过程，形参和实参共用内存的同一地址。在被调用过程 中，形参的值一旦改变，相应实参的值也跟着改变。如果实参是一个常数或表达式，VB 会按“传值”方式来处理。 4．数组参数 VB 允许把数组作为形参出现在形参表中，语法： 形参数组名（） [As 数据类型] 形参数组只能按地址传递参数，对应的实参也必须是数组，且数据类型相同。调用过程时，把要传递的数组 名放在实参表中，数组名后面不跟圆括号。在过程中不可以用 Dim 语句对形参数组进行声明，否则会产生“重复 声明”的错误。但在使用动态数组时，可以用 ReDim 语句改变形参数组的维界，重新定义数组的大小。 5． 对象参数 VB 中可以向过程传递对象，在形参表中，把形参变量的类型声明为“Control。