VB教程[1].doc

第一章 Visual Basic 程序设计概述 教学基本要求 了解： Visual Basic 程序的基本特点； Visual Basic 与其他可视化程序的区别。 掌握： Visual Basic 的安装与启动；集成开发环境中各窗口的功能与使用。 重点、难点 Visual Basic 语言特点和开发环境。 1.1 Visual Basic 的发展 Basic 语言是 20 世纪 60 年代美国的两位教授共同设计的计算机程序设计语言，其含义是“初学者通用的符号指令代码”。它简单易学、人机对话方便、程序运行调试方便。 20 世纪 80 年代，随着结构化程序设计的需要，新版本的 Basic 语言增加了新的数据类型和程序控制结构，其中较有影响的有 True Basic 、 Quick Basic 和 Turbo Basic 等 1988 年 Microsoft 公司推出的 Windows 操作系统，以其为代表的图形用户界面（ GUI ）在微机上引发了一场革命。 1991 年 Microsoft 公司推出的 Visual Basic 语言是以结构化 Basic 语言为基础，以事件驱动为运行机制。它的诞生标记者软件设计和开发的一个新时代的开始。在以后的几年里， Visual Basic 经历了 1.0 版、 2.0 版 6.0 版几次升级，它的功能也更加强大，更加完善，最新版本为 VB.net 。本书以 Visual Basic 6.0 为蓝本。 1.2 VB 功能特点 1.2.1 引例 例 1.1 简单动画演示。“计算机科学系”在窗体中左右移动。 根据题目要求，利用工具箱上的 Label 、 CommandButton 和 Timer 等控件。 在代码窗口编写如下程序代码： Private Sub Form_Load() Me.Timer1.Interval = 1000 End Sub Private Sub Timer1_Timer() Me.Label1.Left = Me.Label1.Left + 100 End Sub 1 2 2 VB 的功能特点 VB 提供可视化的编成工具 用传统的高级语言编程，主要的工作是设计算法和编写程序。而用 Visual Basic 开发应用程序，包括两部分工作：一是设计用户界面；二是编写代码。 事件驱动的编成机制 每个事件都能驱动一段程序的运行，程序员只要编写响应用户动作的代码，各个动作之间不一定有联系。这样的应用程序代码较短，使得程序易于编写易于维护。 提供了易学易用的应用程序集成开发环境 在 VB 集成开发环境中，用户可设计界面、编写代码和调试程序，把应用程序编写成可执行文件。 结构化的程序设计语言 VB 具有丰富的数据类型，众多的内部函数，模块化、结构化的程序设计机制，结构清晰，简单易学。 强大的数据库操纵功能 VB 中利用数据控件可以访问多种数据库系统。 Active 技术 使用 VB 能够开发集声音、图像、动画、字处理、电子表格等 网络功能 使用户在 VB 中开发多功能的网络应用软件。 多个应用程序向导 通过它们可以快捷地创建不同类型、不同功能的应用程序。 1.3 VB 的安装和启动 1 3 1 安装 系统要求 VB 6.0 是 Windows 9x/2000/Xp/Nt 下的一个应用程序。 VB 6.0 有三种版本，即学习版、专业版和企业版。对硬盘的要求约为 140Mb 左右，除此以外，为了安装帮助系统 MSDN 还需要约 67Mb 空间。 安装 VB 6.0 系统可以放在一张 CD 盘上，通过执行 Setup.exe, 在安装程序的提示下进行安装。 帮助系统 MSDN 可以放在两张 CD 盘上。 1.3.2 启动 开始 - 程序 - Microsoft Visual Basic 6.0 中文版 - Microsoft Visual Basic 6.0 中文版 1 4 集成开发环境 VB 6.0 的集成环境与 Microsoft Office 家族中的软件类似。 Visual Basic 顶级菜单有： 文件、编辑、视图、工程、格式、运行、查询、图表、工具、外接程序、窗口、帮助，但菜单命令是通过子菜单中的子菜单项发出的。 文件菜单主要用于建立、打开、添加、移去、保存工程和文件，包括：新建工程 、打开工程 、添加工程 、移除工程 、保存工程 、工程另存为 、保存文件 、文件另存为 、打印 、打印设置 、生成工程 等子菜单项。 工具菜单包括：添加过程、过程属性、菜单编辑器、选项、发布等子菜单项。 视图菜单用于显示各种窗口及和窗口有关的操作 。包括：代码窗口、对象窗口、定义、最后位置、对象浏览器、立即窗口、本地窗口、监视窗口、调用堆栈、工程资源管理器、属性窗口、窗体布局窗口、属性页、表、缩放、显示窗格、工具箱、调色板、工具栏等子菜单项。 工程菜单用于为当前工程创建模块、作对象引用或提供各种设计器 。包括：添加窗体、添加 MDI 窗体、添加模块、添加用户控件、添加属性页、添加用户文档、添加设计器、添加文件、移除、引用、部件、工程属性等子菜单项。 格式菜单用于界面设计，能使界面中的控件规范排列 。包括：对齐、统一尺寸、按网格调整大小、水平间距、垂直间距、在窗体中居中对开、顺序、锁定控件等子菜单项。 调试菜单用于调试、监视程序 。包括：逐语句、逐过程、跳出、运行到光标处、添加监视、编辑监视、快速监视、切换断点、清除所有断点、设置下一条语句、显示下一语句等子菜单项。 查询菜单中各条菜单命令用于数据库表的查询及相关操作 。所提供的各种查询设计工具，使用户能够通过可视化工具创建 SQL 语句，实现对数据库的查询、修改。 运行菜单用于执行程序 。包括：启动、全编译执行、中断、结束、重新启动等子菜单项。 图表菜单中各条菜单命令用于数据库中表、视图的各种相关操作。所提供的各种图表设计器，使用户能够用可视化的手段操作表及其相互关系，和创建和修改应程序所包含的数据库对象。 工具菜单包括：添加过程、过程属性、菜单编辑器、选项、发布等子菜单项。 外接程序菜单工程菜单用于为当前工程创建含：可视化数据管理器、外接程序管理器等子菜单项。 窗口菜单用于调整已打开窗口的排列方式。包括：拆分、水平平辅、垂直平铺、层叠、排列图标等子菜单项。 第二章 简单的 VB 程序设计 教学基本要求 掌握：建立简单的应用程序；基本控件：窗体、标签、文本框、命令按钮等基本用法与它们的基本属性；工程的组成与操作。 理解： 程序调试。 了解： 类、对象和控件的概念与它们之间的关系；使用帮助系统。 重点、难点 了解类、对象和控件的概念与它们之间的关系；使用帮助系统和 VB 程序设计步骤。 2.1 对象的概念 VB 是一种基于面向对象的程序设计语言，程序的核心由对象以及响应各种事件的代码组成。在 VB 中不仅提供了大量的控件对象，而且还提供了创建自定义对象的方法和工具，为开发应用程序带来了方便。 2.1.1 对象和类 对象在现实生活中到处可见。例如，一个人，一辆汽车，一台电脑等都是一个对象。对象是具有某些特性的具体事物的抽象。每一个对象都具有描述其特性及附属于它的行为。例如，一辆汽车有型号、外壳、车轮和颜色等特性，又有启动、加速和停止等行为。对象还可以分为很多更小的对象。 例如，车轮也是一个对象，它有外胎、轮胎和尺寸等属性、方法，也有充气和放气等行为。 类是创建对象实例的模板，是同种对象的集合与抽象，它包含所创建对象的属性描述和行为特征的定义。类是对象的定义，而对象是类的一个实例。例如，汽车是类，某一辆具体的小轿车是对象。 面向对象的程序设计主要是建立在类和对象的基础上。 在 VB 中，工具箱上的可视化类图标是 VB 系统设计好的标准控件类，此外， VB 还可在“工程”菜单的“部件”项中加入大量的 Active X 控件。当在窗体上画一个控件时，就将类转换为对象，即 创建了一个控件对象，简称为控件。 例如，图所示的工具箱上的 TextBox 控件是类，它确定了 TextBox 的属性、方法和事件。窗体上显示的两个 Text 对象，是 TextBox 类的实例化。他们继承了该类的特征。 除了通过利用控件对象外， VB 还提供了系统对象，例如，打印机、剪贴板、屏幕和应用程序等。 2.1.2 对象的建立和编辑 对象的建立 在窗体上建立对象的步骤如下： 单击鼠标左键进行对象选择。 移到窗体上所需的位置处，调整大小后释放鼠标。 建立对象更方便的方法是直接在工具箱双击所需的控件图标。 对象的选定 对象的选定， Win98 和 Office 的对象选定是相似。 复制和删除对象 复制和删除对象， Win98 和 Office 的对象选定是相似。 对象的命名 建立的控件都有默认的名字，用户也可在属性窗口同构设置 Name （名称）来给对象重新命名，名字必须字母或汉字开头，长度不超过 255 个字符。其中也可以出现下划线。 2.1.3 对象的属性、事件和方法 属性、事件和方法是 VB 中最基本的和十分重要的概念。在每一个程序中，都需要用到它们。 属性（ Property ） 设置属性可以有两种方法： （ 1 ）在设计阶段，选中一个对象后属性窗口中选择所需要的属性行，从键盘或鼠标输入属性值。 （ 2 ）可以在运行阶段，由程序改变属性的值。其一般形式为： 对象名 . 属性名 = 属性值 例如： Form1.Caption=“Visual Basic” 注意一定要弄清楚给那一个对象的属性赋值。不要写错对象名。 各命令按钮的代码如下： 1. 用户单击第一个窗体，就隐藏第一个窗体，显示第二个窗体。 Private Sub Form_Click() Form1.Hide Form1.Show End Sub 2. 用户单击第二个窗体，就显示第一个窗体，隐藏第二个窗体。 Private Sub Form_Click() Form1.Show Form1.Hide End Sub 事件（ Event ） 一个 VB 程序包含若干个过程。它不同于传统的面向过程的计算机高级语言。在 VB 中，子程序称为过程。 VB 中有两类过程：事件过程和通用过程，此外还有函数。程序的运行并不要求从主程序开始，每个事件过程都由相应的 “ 事件 ” 触发而执行。各事件的发生顺序是任意的。这样就使编程序的工作变得比较简单了。 人们只需针对一个事件编写出一段过程即可。通用过程和函数的调用方法与其它高级语言基本相同。 VB 中所制定的 “ 事件 ” 是指由系统事先设定的、能为对象识别和响应的动作。每一种对象能识别的事件是不同的。尽管每一种对象所支持的事件很多，但实际上，一个程序中往往只用到其中几种，可根据实际需要选定。 方法（ Method ） “ 方法 ” 是 VB 中的一个术语，所谓 “ 方法 ” 实际上是 VB 提供的一种特殊的子程序，用来完成一定的操作。 调用 “ 方法 ” 的形式与调用一般的过程或函数不同，应该指明是那个对象调用的其调用格式如下： 对象名 . 方法名 例如： Form1.Hide 为了清晰和不致搞混，最好都在 “ 方法名 ” 之前加上 “ 对象名 ” 为好。每一种对象所能调用的 “ 方法 ” 是不同的。请仔细区分属性、事件和方法三者的含义和用法。属性和方法的用法形式上有些类拟。 对象名 . 属性名 对象名 . 方法名 2.2 建立简单的应用程序 以 例 2.1 为例 1. 建立用户界面的对象 2. 对象属性的设置 3. 对象事件过程及编程 4. 程序运行和调试 5. 保存文件 2.3 基本控件和窗体 2.3.1 基本属性 1.Name 名称属性 创建的对象名称 , 有默认的名 . 在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。 2.Caption 标题属性 该属性决定了控件上显示的内容。 3.Height 、 width 、 top 和 left 属性 height 和 Width 属性决定了控件的高度和宽度， Top 和 Left 属性决定了控件窗体中的位置。 4.Enabled 属性 控件是否可操作 . 当设置为 false 时 , 呈暗淡色 , 禁止用户进行操作 . 5. Visible 属性 控件是否可见 . 当设置为 false 时 , 用户看不到，但控件本身存在。 6. Font 属性 FontName 字体 FontSize 字体大小 FontBold 是否是粗体 FontItalic 是否斜体 FontStrikethru 是否加一删除线 FontUnderline 是否带下划线 例 2.2 在窗体是建立两个命令按钮 Command1 和 Command2 ， Command2 的 Font 通过属性窗口设置， 其余 属性通过代码实现如下： Private Sub Form_Click() Command1.Caption=” 确定 ” Command1.FontName=” 黑体 ” Command1.FontSize=20 Command1.FontBold=True Command1.FontItalic=True Command1.Underline=True Command1.Enabled=False Command2.Enabled=True Command2.Caption=” 取消 ” End Sub 7. Forecolor 前景颜色属性 设置控件的前景颜色（即正文颜色 ). 其值是一个 16 进制常数，用户可以在调色板中直接选择所需颜色。 8. Backcolor 背景颜色属性 9. Backstyle 背景风格属性 Transparent ：透明显示，即控件背景颜色显示不出来 Opaque ：不透明，此时可为控件设置背景颜色 10. BorderStyle 边框风格属性 0-None ：控件周围没有边框 1-Fixed Single ：控件带有单边框。 11. Alignment 属性 控件上正文水平对齐方式 0: 正文左对齐 1: 右对齐 2: 居中 12. AutoSize 属性 控件是否根据正文自动调整大小 True ：自动调整大小 False ：保持原设计时的大小 13.TabIndex 属性 决定了按 Tab 键时，焦点在各个控件移动的顺序。 各个控件默认 TabIndex 值就是以控件建立时 的顺序 , 第一个为 0 例 2 3 有关属性的综合应用。有 5 个标签，其名称为默认值 Label1,Label2 每个标签的高度和宽度相同，有关各项属性设置见表，运行后界面如图所示。 2.3.2 窗体 Form 1. 主要属性 （ 1 ） Caption 标题 Caption 属性决定窗体标题栏显示的内容 （ 2 ） MaxButton 、 MinButton 属性 当 MaxButton 属性为 True 时，窗体右上角有最大化按钮，为 Flase 则无。 当 MinButton 属性为 True 时，窗体右上角有最小化按钮，为 Flase 则无。 （ 3 ） Icon 、 ControlBox 属性 用户可以选择一个图标文件装入，当窗体最小化时显示该图标。 当 ControlBox 属性为 True 时，窗体左上角有控制菜单框， False 时，则无。 （ 4 ） Picture 属性 该属性用于设置窗体中要显示的图片。 （ 5 ） BorderStyle 0None: 窗体无边框，无法移动及改编大小。 1Fixed Single: 2Single: 窗体为双线边框，可移动并可以改变大小，这是默认值。 3 Fixed Double ：窗体为固定对话框，不可改变大小。 4 Fixed Tool Window ：窗体外观与工具条相似，有关闭按钮，不能改变大小。 5Single Tool Window ：窗体外观与工具条相似，有关闭按钮，能改变大小。 该属性在运行时只读。当 BorderStyle 设置为除 2 以外的值时，系统自动将 Min Button 和 Man Button 设置为 Flase 。 （ 6 ） WindowsState 属性 该属性表示窗体执行时以什么状态显示。属性值有： Normal ：正常窗口状态，有窗口边界。 Minimized ：最小化状态，以图标方式显示。 Maximized: 最大化状态，无边框，充满屏幕。 2. 事件 Click 单击事件 DblClick 双击事件 Load 当装入窗体时激发，通常用于对属性和变量初始化 3. 方法 窗体上常用的方法有 Print 、 Cls 和 Move 等。 2.3.3 标签 Label 用于显示标签 ( 输出 ) 信息，不能作为输入信息的界面。 1. 主要属性 标签最重要属性有： Caption 、 Font 、 Left 、 Top 、 BorderStyle 和 BackStyle 等 2. 事件 标签经常接收的事件有 : 单击（ Click ）、双击（ DblClick ）和改变（ Change ）。 2.3.4 文本框 TextBox 用于显示文本 ( 输出 ) 信息，能作为输入 / 输出信息的界面。 1. 主要属性 Text 属性 文本框无 Caption 属性，显示的正文内容存放在 Text 属性中。当程序执行时，用户通过键盘输入、编辑正文。 MaxLength 属性 MaxLength 属性指明文本框中能够输入的正文内容的最长度。 0 ：任意长字符串。 非零值：文本框中字符个数的最大值。 MultiLine 属性 MultiLine: 文本框是否为多行正文。 True 时，文本框可以输入多行正文 False 时，文本框不能输入多行正文。默认一行 False 。 ScrollBars 属性 当 MultiLine 为 True 时 , 该属性才有效 , 表示滚动条的形式。 0None ：无滚动条。 1Horizontal ：加水平滚动条。 2Vertical ：加垂直滚动条。 3Both ：同时加水平滚动条和垂直滚动条。 Locked 属性 指定文本控件是否可被编辑属性， False ，表示为可编辑。当设置为 True 时，文本控件相当于标签的作用。 PassWordChar 口令字符 Text 属性返回输入的数据 , 屏幕显示该字符 SelStart ， SelLength ， SelText : 选中文本的起始、长度、内容。 2. 事件 标签经常接收的事件有 : 改变（ Change ）、键盘（ KeyPress ）、失去焦点（ LostFocus ）和获得焦点（ GotFocus ）。 3. 方法 文本框最有用的方法是 SetFocus, 该方法是把光标移到指定的文本框中。 3.5 命令按钮 CommandButton 接受用户输入的命令 . 输入命令可以有三种方式 : 鼠标单击。 Tab 键焦点到该按钮。 快捷键。 1. 主要属性 Caption: 命令按钮显示的内容 , 可设置快捷键 , 例 &Ok , 显示 Ok Value: 检查该按钮是否按下，该属性在设计时无效 . Picture : 按钮可显示图片文件 (.bmp 和 .Ico) ，当 Style 为 1 时有效 Style : 确定显示的形式。 0Standard: 只能显示文字。 1Graphical: 文字、图形均可。 ToolTipText ：设置工具提示，和 Picture 结合使用。 2. 事件 Click 建立一个允许剪切、复制和粘贴的简单便笺板程序。 2.3.6 常用方法 方法是面向对象的，故使用的形式为： 对象 . 方法 1.Print 方法 形式 : 对象 .PrintSpc(n)|Tab(n) 表达式列表 ； | ， 作用 : 在对象上输出信息 对象：窗体、图形框或打印机 (Printer) , 省略对象在窗体上输出。 Spc(n) 函数：插入 n 个空格，允许重复使用。 Tab(n) 函数：左端开始右移动 n 列，允许重复使用。 ； ( 分号 ) ：光标定位上一个显示的字符后。 ， ( 逗号 ) ：光标定位在下一个打印区的开始位置处。 无；，换行。 开始打印的位置是由对象的 CurrentX 和 CurrentX 属性决定，缺省为打印对象的左上角 0 ， 0 。 注意： Print 方法在 Form _Load 事件过程中起作用，必须设置窗体的 AutoRedraw 为 True 。 例 2.9 显示图形 Private Sub Form_Click() For i = 1 To 5 Print Tab(i); String(6 - I, ); Spc(6); String(I, ) Next i End Sub 考虑：若把 Spc(6) 换成 Tab(6) ，效果如何？ 2. Cls 方法 形式 : 对象 .Cls 作用 : 清除运行时在窗体或图形框中显示的文本或图形。 注意 : 不清除在设计时的文本和图形。 3. Move 方法 形式 : 对象 .Move 左边距离 ，上边距离 ，宽度 ，高度 作用 : 移动窗体或控件，并可改变其大小。 对象：可以是窗体及除时钟、菜单外的所有控件 2.4 工程的管理及环境的设置 2.4.1 工程的组成 工程文件包含了一个应用程序的所有文件 : 窗体文件（ .frm ） : 控件及属性、事件过程和自定义过程 窗体的二进制数据文件（ .frx ） , 自动产生同名 .frx 文件。 标准模块文件（ .bas ） 类模块的文件（ .cls ） 资源文件（ .res ） ActiveX 控件的文件（ .ocx ） 2.4.2 创建、打开和保存工程 注意 : 1. 窗体名和窗体文件名概念， 窗体名：窗体的 Name 属性，在代码中用来引用该窗体 , 同一工程不能有相同的窗体名； 窗体文件名：窗体存放在磁盘上的文件名 , 该文件包含了该窗体的所有控件属性和代码 , 同一文件夹不能有相同的文件名。 2. 在工程中添加现存的窗体时，只是对该窗体文件的引用纳入工程。因此，如果更改窗体并保存它，会影响包含此窗体文件的任何工程。 3. 在工程中删除窗体时，仅将此窗体从工程里删除掉，但是窗体文件仍存在于磁盘上。但是，如果在 VB 之外删除一个窗体文件， VB 不能更新此工程文件 , 当打开此工程时，将显示一个文件丢失的错误信息。 2.5 程序调试 2.6.1 错误类型 （ 1 ）编辑错误 在编辑代码时， VB 会对键入的代码直接进行语法检查。当发现代码存在打字错误，遗漏关键字或标点符等语法错误， VB 在 Form 窗口中弹出一个子窗口，提示出错信息，出错的那一行变成红色。这时，用户必须单击 “ 确定 ” 按钮，关闭出错提示窗，然后对出错行进行修改。 （ 2 ）编译错误 编译错误指按了 “ 启动 ” 按钮， VB 开始运行程序前，先编译执行的程序段时，产生的错误。此类错误由于用户未定义变量、遗漏关键字等原因产生。这时， Visual Basic 也弹出一个子窗口，提示出错信息，出错的那一行被高亮度显示。 （ 3 ） 运行错误 运行时错误指 VB 在编译通过后，运行代码时发生的错误。这类错误往往是指令代码执行了一非法操作引起的。例如类型不匹配、试图打开一个不存在的文件等。 （ 4 ） 逻辑错误 程序运行后，得不到所期望的结果，这说明程序存在逻辑 错误。这类错误往往是程序存在逻辑上的缺陷所引起。例如，运算符使用不正确、语句的次序不对、循环语句的起始、终值不正确等。通常，逻辑错误不会产生错误提示信息，故错误较难排除，需要程序员仔细地阅读分析程序以及调试。 2.6.2 调试错误 1 ） VB 的三种模式 设计模式 设计 进行程序的界面设计、属性设置、代码编写等。 运行模式 运行 执行 “ 运行 / 启动 ” 命令，可以查看程序代码，但不能修改。 中断模式 中断 当在运行模式，按了 “ 中断 ” 命令或当程序出现运行时错误时进入中断模式。可以查看代码、修改代码、检查数据。 2 ）调试窗口 有三个调试窗口，它们是： “ 立即 ” 窗口、 “ 监视 ” 窗口、和 “ 本地 ” 窗口。可单击视图菜单中的对应命令打开这些窗口。 3 ）设置断点和逐语句跟踪 断点是告诉 VB 挂起程序执行的一个标记，当程序执行到断点处即暂停程序的运行，进入中断模式。设置或删除断点的步骤：中断模式下，直接查看某个变量的值，只要把鼠标指向所关心的变量处，稍停一下，就在鼠标下方显示该变量的值。 第三章 VB 语言基础 教学基本要求 重点掌握 Visual Basic 的基本语法知识 掌握常量和变量的定义和使用。 了解各种运算符的具体用法。 理解：常用内部函数。 重点、难点 熟练掌握 Visual Basic 6.0 的数据类型，常量、变量和运算符和常用内部函数。 3.1 数据类型 在各种程序设计语言中，数据类型的规定和处理方法是各不相同的。 VB 支持的数据类型如下： 基 本 数 据 类 型 数据类型 关键字 类型符 占字节数 前 缀 大小范围 字节 Byte 无 1 B 0 255 逻辑 Boolean 无 2 F True 或 False （ -1 或 0 ） 整型 Integer % 2 i -32,768 32,767 长整型 Long & 4 L -2,147,483,648 2,147,483,647 单精度实数 Single ！ 4 S -3.402823E+38 3.402823E+38 双精度实数 Double # 8 Dbl -1.79769313486E+308 1.79769313486E+308 字符型 String $ 与串长有关 Str 065535 个字符 日期类型 Date 无 8 Dt 1/1/100 12/31/9999 对象类型 Object 无 4 Obj 任何对象 变体内型 Variant 无 Vnt 上述有效范围之一 数值数据类型 数值（ Numeric ）类型分别是： Integer,Long,Single,Double ， Currency 和 Byte 。 2. 日期数据类型 日期（ Date ）型数据按 8 字节的浮点数来存储。 3. 逻辑数据类型 逻辑（ Boolean ）数据型用于逻辑判断，他只有 True 与 False 两个值。 4. 字符数据类型 字符（ String ）类型存放字符数据。 5. 对象数据类型 对象（ Object ）变量作为 32 位（ 4 个字节）地址来存储。 6. 变体数据类型 变体（ Variant ）是一种特殊的数据类型。 3.2 变量与常量 一 . 变量和常量的命名规则 变量：在程序运行中其存储的值可以改变。 常量：在程序运行中其值不可以改变。 命名 规则： 1. 以字母或汉字开头，后可跟汉字、字母、数字或下划线组 成，长度小于等于 255 个字符； 2. 不要使用 VB 中的关键字； 3.VB 中不区分变量名的大小写 . 4. 为了增加程序的可读性，可在变量名前加一个缩写的前缀来表明该变量的数据类型。 二 . 变量声明 1. 用 Dim 语句 显式 声明变量 形式 :Dim 变量名 AS 类型 Dim 变量名类型符 例 Dim iCount As integer , sAllsum As single 等价于 Dim iCount%, sAllsum! 2. 隐式声明 未进行上述的声明而直接使用 , 其类型为 Variant 类型 建议不使用 . 注意 : 在通用声明处加 Option Explicit 语句来强制显式声明变量。 三 . 常量 1. 用户声明常量 形式： Const 常量名 AS 类型 = 表达式 省略 AS 类型 , 常量的类型由表达式值的类型决定 为使与变量名区分，一般常量名使用大写字母 例 Const MAX=100 3.3 运算符与表达式 一 . 运算符 1. 算术运算符 例： 5+10 mod 10 9 / 3 +2 2 结果： 10 2. 字符串运算符 、 + 字符串连接 123 + 456 结果 123456 123 & 456 结果 123456 区别 : + 两边必须是字符串 , & 不一定 例如 : abcdef + 12345 出错 abcdef & 12345 结果为 abcdef12345 123 + 456 结果为 579 123 & 456 结果为 123456 3 关系运算符 将两个操作数进行大小比较 , 结果为逻辑量。 字符串比较 , 则按字符的 ASCII 码值从左到右一一比较 , 直到出现不同的字符为止 . 。 例： ABCDE ABRA 结果为 False 男字 女字 按汉字的拼音字母比较 4. 逻辑运算符 将操作数进行逻辑运算，结果是逻辑值 条件表达式 1 And 条件表达式 2 条件表达式均为 T 结果为 T 条件表达式 1 Or 条件表达式 2 条件表达式有一个 T 结果为 T 二 . 表达式 1. 组成 变量、常量、函数、运算符和圆括号 2. 书写规则 （ 1 ）运算符不能相邻。例 a+-b 是错误的。 （ 2 ）乘号不能省略。例 x 乘以 y 应写成： x*y （ 3 ）括号必须成对出现，均使用圆括号。 （ 4 ）表达式从左到右在同一基准上书写，无高低、大小。 3. 不同数据类型的转换 运算结果的数据类型向精度高的数据类型靠 . IntegerLongSingleDouble= 字符运算符 关系运算符 逻辑运算 例：用人单位招聘秘书：年龄小于 40 岁，女性，学历专科或本科 年龄 40 性别 =“ 女 ” ( 学历 =“ 专科 ” 学历 =“ 本科 ”) And And Or 考虑：若分别写成： 年龄 40 And 性别 =“ 女 ” And ( 学历 =“ 专科 ” And 学历 =“ 本科 ”) 年龄 40 Or 性别 =“ 女 ” Or ( 学历 =“ 专科 ” Or 学历 =“ 本科 ”) 例：表示算术表达式： 正确的 VB 表达式： 3 =x And x =7 错误的 VB 表达式： 3=x=7 或 3=x Or x=7 3.5 常用内部函数 1. 数学函数 Rnd 函数返回 0 和 1 （包括 0 但不包括 1 ）之间的双精度随机数 . 每次运行时，要产生不同序列的随机数，执行 Randomize 语句 . 例产生 1-100 的随机数 : Int(Rnd *100)+1 常用数学函数： 函数名称 含 义 实 例 结 果 Abs(N) 取绝对值 ABS(-3.5) 3.5 Cos(N) 余弦函数 Cos(0) 1 Exp （ N ） e 为底的指数函数，即 e x Exp （ 3 ） 20.086 Log （ N ） 以 e 为底的自然对数 Log(10) 2.3 Rnd(N) 产生随机数 Rnd 01 之间的数 Sin(N) 正弦函数 Sin(0) 0 Sgn(N) 符号函数 Sgn （ -3.5 ） -1 Sqr(N) 平方根 Sqr （ 9 ） 3 Tan(N) 正切 函数 Tan(0) 0 2. 转换函数 Chr(66) “B“ Asc (“B) 66 Asc(Chr(99) 99 Chr(Asc(“K”) “K” Ucase$(abcdefg) “ABCDEFG 常用转换函数： 函数名称 含 义 实 例 结 果 Asc(C) 字符转换成 ASCII 码值 Asc(“A”) 65 Chr$(N) ASCII 码值转换成字符 Chr$(65) A Fix （ N ） 取整 Fix （ -3.5 ） Fix （ 3.5 ） -4 3 Hex$(N) 十进制 转换成 十六进制 Hex(100) 64 Int(N) 取最大整数 Int(-3.5) Int(3.5) -4 3 Lcase$(C) 大写字母转成小写字母 Lcase$(“ABC”) “abc” Oct(N) 十进制 转换成八进制 Oct(100) 144 Round(N) 四舍五入 取整 Round(-3.5) Round(3.5) -4 4 Str$(N) 数字转成字符串 Str(123.45) “ 123.45” Ucase$(C) 小写字母转成大写字母 Ucase$(“abc”) ABC Val(C) 数字字符串转成数值 Val( “ 123AB ” ) 123 3. 日期函数 Time 返回系统时间 Date 返回系统日期 日期函数 函数名称 含 义 实 例 结 果 Date() DateSerial( 年 , 月 , 日 ) DateValue( date ) Day( date ) Hour( time ) Minute( time ) Month( date ) MonthName( month , abbreviate ) Now Second( time ) Time WeekdayName( weekday , abbreviate , firstdayofweek ) Year( date ) 4. 字符串函数 (1) 字符串函数 Mid$(ABCDEFG,2,3) BCD InStr(2, ABCDEFG, EF) 5 S= Split (123,56,ab,) Join(S,) 123 56 ab Replace(ABCDABCD,CD,123) “AB123AB 123” 字符串编码及操作函数 函数名称 含 义 实 例 结 果 InStr(N1,C 1 ,C 2 , M) 在 C1 中从 N1 开始找 C2 ，省略 N1 从头开始找，找不到为 0 InStr(2,”EFABCDEFG”,”EF”) 7 Left(C,N) 取出字符串左边的 N 个字符 Left(”ABCDEFG”,3) “ ABC ” Len(C) 字符串长度 Len(“AB 高等教育 ”) 6 LenB(C) 字符串所占的字节数 LenB(“AB 高等教育 ”) 12 Ltrim(C) 去掉字符串左边的空格 Ltrim(“ ABCD”) ABCD Mid(C1,N1,N2) Right( string , length ) Space( number ) String( number , character ) Trim(C) 5. 格式输出函数 例 3.1 利用 Format 函数显示有关的日期和时间。 Form_CLICK() 效果 FontSize=12 MyTime = #9:21:30 PM# MyDate = # 7/21/97 # Print Format(MyDate, m/d/yy) Print Format(MyDate, mmmm-yy) Print Format(MyTime, h-m-s AM/PM) Print Format(MyTime, hh:mm:ss A/P) 显示系统当前日期和时间 Print Format(Now ， yyyy 年 m 月 dd 日 hh ： mm) 以系统预定义的格式 显示系统当前时间 Print Format(Date, dddd,mmmm,dd,yyyy) End Sub 6. Shell 函数 能在 DOS 下或 Windows 下运行的应用程序，也可以在 VB 中调用 . 形式 : Shell( 命令字符串 , 窗口类型 ) 窗口类型值为 1 表示正常窗口，缺省窗口最小化为图标。 i = Shell(c:windowscalc.exe) j = Shell(c:, 1) 第四章 基本的控制结构 教学基本要求 重点掌握 Visual Basic 的基本控制结构 掌握赋值语句、交互函数、 IF 语句、 SelectCase 语句、 For 语句和 Do.Loop 语句的使用。 理解：了解各种循环的嵌套的具体用法。 重点、难点 熟练掌握 Visual Basic 6.0 的控制语句以及使用方法。 4.1 顺序结构 一 . 赋值语句 形式 : LET 变量名表达式 作用 : 将表达式的值赋值给变量名 . 一般用于给变量赋值或对控件设定属性值 . 例 : sRate!=0.1 Text1.Text 欢迎使用 Visual Basic 6.0” 当表达式的类型与变量的类型不一致时 , 强制转换成左边的精度 iA% = 10 / 3 iA 中的结果为 3 注意：虽然赋值号与关系运算符等于号都用 “=” 表示， VB 系统会根据所处的位置自动判断是何种意义的符号。 二 . 与用户交互函数和过程 1. InputBox 函数 InputBox( 提示 ，标题 ，缺省 ， x 坐标位置 ， y 坐标位置 ) 其中 : 提示 提示信息 , 标题 对话框标题 , 缺省输入区缺省值函数返回字符类型 . 例要在屏幕上显示如下的对话框 : Dim strName As String * 40 ， strS1 As String * 40 相应的语句如下 : strName= InputBox( “ 请输入你的姓名 ” + vbCrLf + “ 然后单击确定 ” , “ 输入框 ” ) 也可以： strS1 = “ 请输入你的姓名 ” + Chr(13) + Chr(10) + “ 然后单击确定 ” strName= InputBox(strS1 ， “ 输入框 ” ， ， 100 ， 100) 当键盘输入 “ 王晓明 ” 后 , 变量 strName 获得键