1、1第 1 章 VB 概述教学目的要求：了解 VB 的发展过程和特点掌握 VB 集成开发环境 教学重点VB 集成开发环境及工作模式 1.1 VB 的发展过程和特点* 演示 VB 小程序，说明 VB 学习重要性及方法。一、发展过程：学习版：LearningVB 的基础版本，为初学者提供轻松的编程开发环境。专业版：Professional为计算机专业编程人员提供的一套功能完备开发工具。包括学习版的全部功能。 企业版：Enterprise提供大型网络开发程序，包括专业版功能。二、VB6.0 主要功能特点 VB 是基于 windows 环境的可视化程序设计语言。 即继承了结构化程序设计特点，又具有面向对
2、象语言特点1 事件驱动的编程机制2 友好的集成开发环境3 支持多种数据库系统的访问4 支持动态数据交换、动态链接库、对象的链接与嵌入技术及ctiveX 技术，主要提供共享其它资源的技术 5 完善的联机帮助 1. VB6.0 集成开发环境1、VB6.0 安装（略） 、启动、界面组成2、VB6.0 三种工作模式：设计模式：用户可以进行界面、程序代码的编辑运行模式：程序运行结果，此时界面和程序代码不能编辑。中断模式：程序运行暂时中断，此时可以编辑代码，不能编辑界面。（举例说明）如:计算圆面积窗体，说明设计模式，运行模式，中断模式。2第 2 章 VB 应用程序设计过程教学目的要求：理解面向对象程序设计
3、及概念掌握常用基本控件及应用掌握 VB 工程开发设计步骤教学重点掌握常用基本控件属性、方法、事件教学难点：面向对象程序设计中对象、属性、方法、事件概念2.1 面向对象程序设计基本概念一. 对象概念对象含义：一是客观世界中的每一个实体。二是对象是数据和操作的集合.类的概念：是对具有相同属性和相同操作的一组对象的共同描述，是同种对象的抽象。二、对象的三要素VB 中对象三要素：属性、事件、方法。1、属性：是用来描述对象的特性。不同的对象有不同的属性属性都有其属性值。同一属性中不同对象的属性值也不相同。 (举例说明) VB 中对象属性设置： 在属性窗口上设置 在程序代码中：对象名.属性名=属性值例如：
4、窗体标题设为：学生成绩管理系统.其中标签标题为 “长春工程学院”, 黑体,60 点阵字.2、事件：在 VB 中，系统为每一对象预先定义好一系列的动作。每个事件都有相应的事件过程，事件过程是通过执行一段程序代码来实现的。常见的事件: 单击(Click) 双击(DblClick) 装入(Load) 鼠标移动(MouseMove) 鼠标抬起(Mouseup) 鼠标按下(Mousedown) 获取焦点(GotFocus)事件过程的一般格式:Private Sub _()End Sub3、方法：方法是指对象本身能执行的动作。系统为不同对象提供的一种功能（系统函数或过程）,可供用户直接调用。一般格式如下：
5、3对象名.方法名 参数 窗体常用的方法：Print 、Show 、hide、Cls 、Move 等.例如：在窗体中输出：Visual Basic 程序设计。Form1.Print “ Visual Basic 程序设计“举例说明：对象的属性、事件和方法单击显示按钮，在窗体中显示：长春工程学院2.2 窗体的属性、方法和事件一、窗体常用属性窗体属性决定了窗体的外观和操作。用两种方法来设置窗体属性：一是通过属性窗口设置；二是在窗体事件过程中通过代码来设置：对象名.属性名=属性值。序号 属性 说明 默认值1 Name（名称） 窗体的名称。 Form12 Caption（标题） 窗体标题栏上显示的文字
6、Form13 Width（宽度） 窗体的水平宽度4 Height（高度） 窗体的垂直高度5 Left（左边界限） 窗体左上角距屏幕左边的距离6 Top（上方界限） 窗体左上角距屏幕顶部的距离7 ForeColor(前景色) 窗体工作区前景色，正文颜色8 BackColor(背景色) 窗体工作区的背景色9 Enabled（可用） 决定窗体是否响应用户的事件 Ture False10 Visible（可见） 决定运行后窗体是否可见 Ture False序号 属性 说明 默认值11 Font(字体) 窗体显示字体的属性(设置字体、字形、大小、效果).宋体12 MaxButtonMinButton窗体
7、是否有最大化按钮(Ture，False)窗体是否有最小化按钮(Ture，False)Ture13 Moveable 决定窗体是否能移动. Ture，False. Ture14 BorderStyle（边界） 设定窗体边界的样式 0：无框线，位置、大小固定；1：单线大小固定；2：可调整；3：固定大小的对话框；4：固定大小的工具窗口；5：可调整2-可调整4的工具窗口15 Icon(图标) 设定/改变窗体图标 16 Picture 设置在窗体上显示的图形 无17 WindowState（窗体状态） 窗体显示状态。0：正常；1：最小化；2：最大化0-正常代码中设置:Form1.caption=“计算窗
8、口”Form1.FontName = “黑体“Form1.FontSize = 40Form1.FontBold = True 是否粗体Form1.FontItalic = False 是否斜体Form1.FontStrikethru = True 是否加删除线Form1.FontUnderline = False 是否加下划线Form1.BackColor = RGB(255, 255, 0) 黄色 RGB(红，绿，蓝)函数，三原色混合，值在 0-255 之间Form1.BackColor = QBColor(1) 蓝色 QBColor(参数)函数 参数为 0-15，代表 16 种颜色。或用
9、系统常量 VBred, VBblue,VBgreen 等。Form1.Height = 5000 像素点 Form1.Picture=Loadpicture(“d:user1图像 1.bmp”) 二、窗体常用方法窗体的方法在程序代码中设置，调用方法的一般格式为：对象名.方法名 参数 1，参数 2，Show 方法：显示窗体 , 格式：窗体名 .Show Hide 方法：隐藏窗体 , 格式：窗体名 . HideCls 方法：清除窗体上用 Print 方法显示的信息，格式为：窗体名.ClsMove 移动窗体位置或改变大小语法格式为：窗体名.Move ,Top ，width, height如：form
10、1.move 200,100,6000,8000Print 在窗体中输出信息；格式：窗体名 . Print 输出内容如：Form1.print “ABCD”Form1.print “中国长春” Print 1+2Print “abcd” , 3.14 , 1+2 , “长春” 每一项各占一个输出区（14 列）Print “abcd” ； 3.14； 1+2 ； “长春” 紧凑格式输出。 三、窗体的事件Click(单击)事件 单击窗体空白区事件.DblClick(双击)事件 双击窗体空白区事件.Load(装入)事件 当窗体被装入时,设置其初始化属性.Activate(活动)事件 当窗体为活动窗口
11、时，响应事件5Unload(卸载）事件 当卸载窗体时，响应事件如:关闭窗口时,用 msgbox()提示.Mousedown. Mouseup, Mousemove 鼠标事件KeyPress ，KeyDown ，KeyUp 键盘操作事件* 事件过程包括相应的过程代码四、MDI 窗体:窗体布局中的一种多文档界面“工程”菜单“添加 MDI 窗体”父窗体：添加的 MDI 窗体，子窗体：普通窗体,将其 MDIChild 属性为 True五、窗体装载和卸载 装载窗体：load 窗体名将已设计好的窗体调入内存,但不显示,显示需用 show 方法. 卸载窗体：Unload 窗体名 或 Unload Me 或
12、End 多窗体启动设置： “工程”工程属性”或在工程窗口,用快捷菜单,选 “工程属性” 。2.3 基本控件VB6.0 控件分为三类： 标准控件(内部控件)：由 VB 本身提供的控件，如标签、文本框、等。启动 VB 后，显示在工具箱中，既不能添加，也不能删除。 ActiveX 控件：OLE 控件或定制控件。使用前必须事先添加到工具箱中，否则不能使用。 可插入对象：其它应用程序。一、标签(Label)VB 提供的标签控件只能显示文本，而不能编辑文本。标签通常用 Caption 属性，描述说明信息，或用于输出。标签属性name :标签的名字Caption： 标签的标题。Alignment：确定标签中
13、标题的对齐方式0-LeftJustify 缺省值，标题左对齐。1-RightJustif 标题右对齐。 2-Center 标题居中。AutoSize： 是否根据标题自动调整大小。True，FalseBackStyle：选择标签是否透明。1（缺省值）不透明；0 标签透明。 * 标签字体，标签位置属性（略）标签事件：常用 Click、DblClick 事件。例：设窗体上有一个标签名称为 MyLabel，标题为“长春” ，其 AutoSize 属性值为 True。单击标签时，字体颜色变为兰色；双击标签时，则标签的标题字体增加 10。属性窗口中设置( 略 )事件代码：Private Sub myLab
14、el_DblClick()myLabel.FontSize = myLabel.FontSize + 10End SubPrivate Sub myLabel_Click()6myLabel.ForeColor = QBColor(1)End Sub标签方法：Move 用于实现标签的移动。格式：对象名.Move ,top,width,height例 1:双击标签,使之移动到左边距 200,上边距 100 位置.例 2:利用标签 caption 属性,显示输出信息. (利用&连接不同类型数据)例 3:窗体上有一个标签控件 Label1,单击该标签控件,使该标签控件向右、向下移动 50，代码如下：
15、 Private Sub Label1_C1ick()Label1.Move Label1.Left+50, Label1.Top+50End Sub二、文本框(Text)在 VB 中，文本框通常作为输入控件，也可作为数据输出。常用文本框属性Text 属性：设置文本框中显示的内容。Text1.Text = “欢迎使用 Visual Basic”Text1.Text=123 Alignment 属性：文本对齐方式 MultiLine 属性：是否可以输入或显示多行文本。属性窗口设置:True,FalseMaxlength 属性：设置文本框最大字符数。 （0 无限制）PasswordChar 属性：
16、用于输入保密口令。如设置 *、# 等ScrollBars 属性：在 MultiLine 属性值为 True 时，决定文本框是否带滚动条。0-None 没有滚动条1-Horizontal 只有水平滚动条2-Vertical 只有垂直滚动条3-Both 同时具有水平和垂直滚动条 Locked 属性：决定文本框内容是否可以编辑。Ture 不能编辑，常用于输出显示结果。False 默认值,表示可以编辑,用于输入数据。 其他属性:Font,forecolor,backcolor,top,left,height, width文本框常用事件 Click、DblClick、Change、GotFocus、Lo
17、stFocus、KeyPress 等方法 SetFocus如：Click 事件；如：设计 text1 初始值为 0，每次单击增加 1如：Dblclick 事件；如:设计 text1,字体变大 10 点阵。Change 事件:文本框内容改变时，发生事件。如:建立两个文本框。运行时，Text1 中内容变化时，Text2 显示相同内容。Gotfocus 事件：用 Tab 键或用鼠标选中该对象时，触发该事件，称之为“获得焦点” 。LostFocus 事件：用 Tab 键或用鼠标选择其他对象时，触发该对象事件，称之为“失去焦点” 。如:文本框内容获得焦点时,红色字；失去焦点时,绿色字。 KeyPress
18、 事件：当在键盘上按下某个键时触发该事件。KeyPress 事件返回一个参数 KeyAscII，该参数值为按下键的ASC码。如:在文本框 text1 中输入字母 a 时，显示其 ASCII 码值。7SetFocus 方法：使文本框获得焦点如：text1.setfocus。 使文本框 text1 获得 焦点 Private Sub Command1_Click()Text1.Enabled = TrueText1.SetFocusText2.Enabled = FalseEnd SubPrivate Sub Command2_Click()Text2.Enabled = TrueText2.Se
19、tFocusText1.Enabled = FalseEnd Sub三、命令按钮 Command命令按钮控件：常用来接受用户的操作信息,激发相应的事件过程。命令按钮主要属性Name 名称，默认 commandCaption 标题Font 字体设置(字体,字形,大小等)Enabled 是否有效Style 标准/图形按钮Picture 添加图形/图像( Style 为图形状态)Visible 是否可见命令按钮常用事件:鼠标单击(Click) 鼠标按下(MouseDown) 鼠标抬起(MouseUp) 鼠标移动(Mousemove)如:设计按钮,鼠标按下显示时间, 抬起显示日期命令按钮常用方法:Se
20、tFocus 方法，将焦点定位在指定的命令按钮上.如：在窗体的 Activate 事件中: cmdok.SetFocus 表示将焦点定位在名称为 cmdok 的命令按钮上.例 1 设计一个简易的加法运算器，任意两数相加并显示结果窗体中有 3 个 Text、2 个 Label 和 2 个 Command。Form Caption 设置为:“加法器程序”Label1 Caption 设置为：“+”Label2 Caption 设置为：“=”Text1 Text 设置为：空Text2 Text 设置为：空Text3 Text 设置为：空Command1 name 属性为 cmdadd,Caption
21、 设置为：“计算”Command2 name 属性为 cmdreset,Caption 设置为：“重设”事件代码过程Private Sub cmdAdd_Click()Text3.Text=Str(Val(Text1.Text)+ Val(Text2.Text)End SubPrivate Sub cmdReset_Click()Text1.Text = “Text2.Text = “Text3.Text = “8End Sub例 2：设计如下窗体，输入半径，计算周长和面积。窗体名称:myform, 标题：计算，背景为浅蓝色标签名称 label_bj,标题：输入半径，样式为透明。标签名称 la
22、bel_zc, 标题：周长，样式为透明。标签名称 label_mj, 标题：面积，样式为透明。文本框名称 mytext, 文本为空三个命令按钮名称：cmd1.cmd2,cmd3，标题为：求周长，求面积，关闭例 3 设计窗体，当用户单击“显示”按钮时，在标签控件中显示“Visual Basic 程序设计基础！” ，当用户单击“清除”按钮时，清除内容窗体 Form 中 2 个 Command，1 个 Label。Command1 Caption 设置为：显示； Name 设置为：cmdDisplayCommand2 Caption 设置为：清除； Name 设置为：cmdClearLabel1 C
23、aption 设置为：空； Name 设置为：lblMessage2.4 Visual Basic 应用程序设计步骤建立一个 VB 应用程序主要步骤： 创建新工程 设计用户界面(添加控件) 设置控件属性 编写程序代码 保存应用程序 运行应用程序 生成可执行文件* 实例说明，VB 生成文件类型。第 3 章 VB 程序设计基础教学目的要求：掌握 VB 基本数据类型；VB 中的常量与变量；掌握运算符与表达式理解常用标准函数教学重点常量与变量、运算符与表达式、常用标准函数教学难点：9变量的类型, 运算符, 标准函数3.1 语句与语法规则Visual Basic 语句由关键字 +其它组成。每个语句以回车
24、键结束，一个语句行最大长度不超过 1023 个字符。常用的语法规则如下：(1) 正确的命令动词首字母大写。(2) 运算符的前后空格。(3) 语句中关键字、函数等可以不区分大小写。(4) 一般情况下，程序要求一行一句；多个语句放在一行中，需用冒号(:) 隔开。(5) 当一条语句较长时，可用续行符分几行写。续行符:空格紧跟下划线( _) 。3.2 数据类型VB 提供系统定义的基本数据类型；还允许用户自定义数据类型。VB 提供的基本数据类型主要有： 数值型 字符串型 布尔型逻辑型 日期型 对象型 和变体型一.数值型数据整数：整型（Integer %）长整型（Long &）实数：单精度浮点型（Sing
25、le !）双精度浮点型（Double #）整型 (Integer ):占 2 个字节, 范围-3276832767。可在数字或变量名的尾部加%表示，如：2，137% ，-45%，x% 长整型(Long):占 4 个字节,范围-21474836482147483647可在数字或变量名尾部加&表示 .如:137&, 32769& , y&单精度(Single): 占 4 个字节，有效数字精确到 7 位，取值范围1.4010-45 3.401038指数形式:1.23E+3，1.5e-5 ，1.23e5* 可在数字或变量名尾部加!表示。如：3.14！，x!双精度(Double)：占 8 个字节，有效数
26、字精确到 16 位。取值范围4.9410-3241.7910+308指数形式：1.23D+3，1.5d-5* 可在数字或变量尾部加 #表示。如：2.3，3.14# , y#二、货币型(Currency)：占 8 个字节。用固定格式表示，小数左边有 15 位，右边有 4 位。取值分围:-922337203685477.5808922337203685477.5807* 可在数字或变量尾部加 表示。主要用于精度较高的货币计算。三、字节型(Byte)是一种无符号整型数 ，占 1 个字节用于存储二进制数据，取值范围：0255 四、字符型数据(String)10字符串是一个用双引号括起来的字符序列。例如
27、：“Hello“ “123456“ “程序设计“ (表示空字符串)“ “(表示空格字符串)只能用$类型符表示变量,如:X$注意:在字符串中,字母的大小写是有区别的。若双引号作为字符串,用连续的两个双引号表示.“asdfas“3245673567“字符串的长度：字符个数，最长 65535 个字符.五、布尔型数据(Boolean)用于逻辑判断结果：True 和 False ，占 2 个字节。注意：数值和布尔型转换当数值型转布尔型时，0 转换为 False，非 0 值转换为 True。当布尔型转数值型时，False 转换为 0，True 转换为-1。六. 日期型数据 ( Date )占 8 个字节，
28、用来表示日期和时间，用两个#括起来.如： #January,1,2001#； #10/21/1980# #1/1/2001 8:20:02 PM# #1/1/2001 8:20:02 AM#3.3 常量与变量一、常量常量是在程序运行过程中，其值不会发生变化的量。有两种形式： 直接常量 符号常量:用户自定义符号常量、系统符号常量。直接常量:字符串常量,数值常量 ,布尔常量,日期常量例如:”欢迎使用 visual Basic”125 1.2E+2 3.14! &O36 （八进制） &H38（十六进制）True False#11/10/2001# #1/1/2001 8:20:02 PM#符号常量：
29、在程序中用一个符号来代替常量,称为符号常量。1、系统符号常量：常以 VB 开头如：VBred , VBgreen, VBblue 等2、用户自定义符号常量,在使用前需要声明, 格式：Public/Private Const 常量名 As 类型=表达式 省略格式:Const 常量名=表达式如:Const pi=3.1415926 l=2*pi*rs=pi*r*r* 用户定义符号常量，在程序中是不可改变的。* 符号常量可以是任何类型。符号常量举例Const Pi=3.14159 Pi 代表 3.14159Const Max As Integer=9 Max 代表整型数 9Const BirthDate=#10/1/2001# BirthDate 代表 2001 年 10 月 1 日，日期型
