VBVisualBasic程序设计初步.ppt

3.1窗体窗体控制按钮关闭窗体按钮最大化窗体按钮最小化窗体按钮标题栏当前窗体名称在Windows系统中，窗体是最常用的对象。Windows的窗体有类似结构和特点。窗体右上方有三个按钮，自左而右分别是：“最小化” 按钮 , “最大化” 按钮和“关闭” 窗体按钮。单击单击 “最小化最小化” 按钮按钮，窗体消失，窗体缩小为屏幕底部任务栏上的一个按钮，表示它不是当前打开的窗体；单击该按钮可以恢复窗体。单击单击 “最大化最大化” 按钮，按钮，使窗体充满屏幕，该“最大化” 按钮变成两个重叠的小方块；单击该按钮，恢复原来的窗体。单击单击“关闭关闭” 按钮，按钮，关闭窗体。3.1.1 窗体设计举例窗体设计举例例1:设计一个VB程序，窗体上画有三个命令按钮，标题分别是“窗体变小”、“窗体变大”和“关闭窗体”。运行程序时，在窗体上装入一幅图片。单击“窗体变大”命令按钮时，窗体变大；单击“窗体变小”按钮时，窗体就小；单击“关闭窗体”按钮，结束程序的运行。窗体界面设计如右图对象属性设置窗体（名称）Form1Caption改变窗体尺寸命令按钮1（名称）cmdLargeCaption窗体变大命令按钮2（名称）cmdSmallCaption窗体变小!命令按钮3（名称）cmdExitCaption关闭窗体3.1.1 窗体设计举例窗体设计举例编写有关事件过程： Private Sub Form_Load() Picture=LoadPicture(D:flower.jpg) End Sub运行程序时,系统自动将窗体装入内存，触发Form_Load事件过程。Form_Load事件过程通常用来对窗体的属性和变量进行初始化。3.1.1 窗体设计举例窗体设计举例要改变窗体的大小尺寸，需要使用窗体的两个相关属性Height 和Width。Height 指窗体的高度，Width指窗体的宽度，单位为twip（缇），一英寸约等于1440twip。使窗体变小的过程代码如下： Private Sub cmdSmall_Click() Form1.Height = Form1.Height - 500 Form1.Width = Form1.Width - 500 End Sub3.1.1 窗体设计举例窗体设计举例单击“窗体变大”按钮，窗体的Height 及Width属性值在原有属性值的基础上增加500，使窗体的尺寸变大。窗体变大的过程如下： Private Sub cmdLarge_Click() Form1.Height = Form1.Height + 500 Form1.Width = Form1.Width + 500 End Sub不断单击“窗体变大”命令按钮，Height和Width属性值不断递加，使窗体越变越大。3.1.1 窗体设计举例窗体设计举例“关闭窗体”按钮的事件过程如下： Private Sub cmdExit_Click() End End Sub“End”语句命令的作用是结束程序的运行。注意：一般来说，一个程序中应该包括结束程序运注意：一般来说，一个程序中应该包括结束程序运行的操作。行的操作。3.1.1 窗体设计举例窗体设计举例例2:设计一个程序，当单击“改变位置”命令按钮时，使窗体的位置改变到屏幕的左上角，单击“还原位置”命令按钮又使它的位置还原，并在标签中显示出所在位置。对象对象属性属性设置设置窗体（名称）Form1Caption确定窗体的位置BackColor&H00FFFF80&（浅蓝色）BorderStyle 1(Fixed Single)命令按钮1（名称）cmdMoveCaption改变位置命令按钮2（名称）cmdResetCaption还原位置命令按钮3（名称）cmdExitCaption退出标签（名称）Lable1Caption置空BorderStyle 1(Fixed Single)属性BackColor的值决定窗体的背景颜色。属性BorderStyle决定窗体的“边界风格”（ BorderStyle）。它有4种可以选择的值：0（None）：窗口无边界；1(Fixed Single)：窗口的边界为单线条，且运行期间窗口的尺寸是固定的（即不能改变其大小）；2(Sizable)：窗口的边界是双线条，且运行期间可以改变窗口的尺寸；3(Fixed Double)：窗口的边界是双线条，且运行期间不可以改变窗口的尺寸。3.1.1 窗体设计举例窗体设计举例3.1.1 窗体设计举例窗体设计举例程序开始运行时, 执行Form_Load事件过程，进行初始化窗体的工作，该事件过程如下： Private Sub Form_Load() Form1.Left = 2000 Form1.Top = 2000 Label1.Caption = Left值是:2000，Top值是:2000 End Sub运行程序，将2000分别赋给窗体的Left和Top两个属性。Left属性指明窗体左边界距屏幕左边界的距离（x轴方向）。Top属性指明窗体窗口顶部距屏幕顶部的距离（y轴方向）。确定了Left和Top属性值，也就确定了窗体在屏幕上的位置。3.1.1 窗体设计举例窗体设计举例单击“改变位置”命令按钮时，把窗体移动到指定的位置，执行cmdMove_Click以下事件过程。Private Sub cmdMove_Click() Form1.Left = 100 Form1.Top = 100 Label1.Caption = Left值是:100，Top 值是:100End Sub程序将窗体的位置改变到屏幕的左上角，即坐标为（100、100）的位置。分别将100赋给窗体的Left和Top两个属性，并把这两个值显示在标签中。3.1.1 窗体设计举例窗体设计举例单击“还原位置”命令按钮，应恢复窗体的初始位置，只需将最初的Top和Left属性值重新赋给这两个属性即可。其过程代码如下： Private Sub cmdReset_Click() Form1.Left = 2000 Form1.Top = 2000 Label1.Caption = Left值是:2000，Top 值是:2000 End SubLeft属性值及Top属性值均为2000，窗体回到原来位置。3.2 VB语法基础语法基础3.2.1 VB的数据类型的数据类型计算机能够处理不同类型的信息，如数值、文字、声音、图形、图像等，这些统称为数据数据。数据可以分为不同的种类，称为数据类型数据类型。不同类型的数据，在内存中的存储结构不同，占用空间不同，取值范围不同，能够对数据进行的操作也不同。程序中的数据有两种表示形式：常量和变量。常量是一个固定的值，如3、4.5。变量的值在程序运行期间可以改变，也可以先后向一个变量赋予不同的值。3.2.1 VB的数据类型的数据类型VB的两大类数据类型：基本数据类型：包括数值类型、字符类型等用户自定义数据类型：利用基本数据类型构造的数据类型。数据的类型不同，能够进行的操作也不同。基本数据类型占用字节值的有效范围类型声明符Integer(整型)2-3276832767%Long(长整型)4-21474836482147483647&Single(单精度实型)4+1.40E-45+3.40E38！Double(双精度实型)8+4.97D-324+1.79D308#Currency(货币类型)8-922337203685477.5805922337203685477.5807String(字符串类型)1/每字符065535个字符$Byte(字节)10255Boolan(布尔型)2True或FalseDate(日期类型)81/1/10012/31/9999无Variant(变体类型)上述有效范围之一3.2.1 VB的数据类型的数据类型某个变量的数据类型可通过函数VarType()测试。Variant数据类型，称为变体类型或变体类型或通用类型。变体类型可以表示上述任何一种数据类型。VarType函数值数值类型0空1Null2整型3长整型4单精度5双精度6货币型7日期型8字符串型3.2.1 VB的数据类型的数据类型Private Sub cmdTest_Click() Dim Var1 As Variant Int1 = 123 Long1 = 186& Single1 = 12.6! Double1 = 34.5 Str1 = abcd Cur = 8886 Da = #10/21/1997# Print VarType(Var1), VarType(Int1), VarType(Long1), VarType(Single1) Print VarType(Str1), VarType(Cur), VarType(Double1), VarType(Da)End Sub例：编写一段程序，给不同的变量赋予不同的值，利用VarType函数测试这些变量的数据类型。在窗体上添加一个名称为cmdTest的命令按钮，编写相应的事件过程。Var1被定义为Variant(变体型)变量，其它各变量(如Int1，Long1，Single1等)均未声明，因此都作为Variant类型处理。3.2.1 VB的数据类型的数据类型当分别对7个Variant型变量赋值后，再用VarType函数测试这8个变量实际的数据类型。运行此程序，输出结果如图。Var1是变体型变量，由于程序中未对它赋值，因此VarType(Var1)的值为0。3.2.1 VB的数据类型的数据类型仅有基本数据类型有时不能满足设计的需要。有时需要将不同类型的数据组合成一个有机的整体，以便于引用。这样一个整体是由若干不同类型的、互相有联系的数据项组成。Type语句能够允许用户自定义数据类型。一般形式： Type 类型名 元素名 As 类型 元素名 As 类型 元素名 As 类型 End Type 例如Type Employee EmpNo As Integer Name As String*10 Age As Integer Tel As String*10 Address As String*20 End Type3.2.2 变量名和变量值变量变量(variable)：在程序执行过程中，其值可以发生变化的量。变量需要有一个名称，作为标识，即变量名。 变量名的命名规则：1）第一个字符必须是字母；2）第二个字符及其后的字符可以是字母、数字及下划线；3）长度不能超过255个字符；4）可用表示变量类型的字符（如：$，% 等）作为变量名的最后一个字符；3.2.2 变量名和变量值5）不能将VB语言中规定的保留字(如语句命令、函数名等)作为变量名使用；6）在变量名中，大小写字母是等价的；7）变量名中间不能有空格；8）在同一个程序模块中，不能有相同的变量名；9）变量名的前面可以有对象名，指明是哪个对象中的变量，在对象名和变量名之间用句点(.)相隔；3.2.3 变量的声明变量的声明在VB程序中应当对变量进行声明声明的作用是告诉VB系统该变量是什么类型，以便系统据此对该变量进行适当的内存分配(不同类型的数据在内存中所占的存储空间和存储方式是不同的)。 3.2.1 VB的数据类型的数据类型 1用Dim声明变量Dim As Dim Name As String Dim Sum As Long Dim Num As Integer Dim X Integer，Y As Single Dim 省略As子句，未指定类型，系统默认为变体Variant类型的数据。例如，声明名称为What的变体类型变量： Dim What可以同时定义两个变量： Dim x as Integer,y as Integer = Dim X ，Y As Integer? 3.2.3 变量的声明变量的声明2.用Static声明变量使用Static声明静态变量，语句格式如下： Static As 一个过程执行结束时，过程中所用到的Static变量值被保留，再次执行这个过程时，变量的初值是上次调用结束时被保留的值，而用Dim语句声明的变量在过程结束时不保留 。例：Private Sub cmdExec_Click() Static a As Integer Dim b As Integer a = a + 1 b = b + 1 Print a=; a, b=; bEnd Sub 执行四次的结果：3.2.4 数组数组数组：把一组具有相同属性、相同类型的数据用一个统一的名字作为标识，为数组。数组中的每一个数据称为一个数组元素数组元素用数组名和该数据在数组中的序号来标识，序号称作下标。在VB中如果没有特别的说明，数组元素的下标是从0开始的，即第一个元素的下标为0。定义数组的一般格式为： Dim 数组名（下界 To 上界）As 数据类型3.2.4 数组数组例如，定义一个名称为Salary、含有101个元素的整型数组(数组元素的下标从0到100，共有101个元素): Dim Salary(100) As Integer 或：或：Dim Salary(0:100) As Integer注意:（1）声明数组时必须说明数组的大小(即元素个数)。（2）不能对数组进行整体赋值或整体运算，如： Salary(0)=3000 (把3000赋给Salary(0) 正确Salary=3000 (企图给数组中所有元素赋予3000) 错误把许多常用的功能编写成一个个子程序，称为函数(function)。一个函数用来实现一个功能。如果想调用一个函数，需要写出这个函数的名字，一般还要求给定参系统提供了一批常用的标准函数。按功能分为数值函数、转换函数、字符串函数、日期函数和其他函数等。 1数值函数，数值函数， 数值函数是用来进行数值运算的函数。 2转换函数转换函数大、小写字母的转换、数据类型的转换等操作可以使用转换函数完成。3.2.5标准函数标准函数3.2.5标准函数标准函数 3字符串函数字符串函数 字符串处理是比较常用的操作 。4日期函数日期函数 使用日期函数，有助于对日期的处理，能够较好地避免出现不符合规范的日期。 5颜色函数颜色函数 在VB中有两个函数可以设置颜色，一个是RGB，一个是QBColor。3.2.6算术运算符与表达式算术运算符与表达式运算符或操作符：用一些简洁的符号描述基本的运算VB有三类运算符： 1算术运算符，用来进行算术运算； 2关系运算符，用来比较两个运算量的大小； 3逻辑运算符，用来进行逻辑运算。与此相应，有三种表达式，即算术表达式、关系表达式和逻辑表达式。 3.2.6算术运算符与表达式算术运算符与表达式运算符含义举 例说 明优先级 加102，结果等于12 6 减7.4 3，结果等于4.4 6Mod 求余7 Mod 2，结果等于1结果是两个数相除后之余 5 整除7 2，结果等于3整除结果取商的整数部分 4* 乘8 * 2，结果等于16 3/ 除 7 / 2，结果等于3.5 3 负号10，结果等于10进行单目运算，10取负 2 指数4 3 ，结果等于64进行乘方运算，43是43 13.2.7 用表达式对变量赋值用表达式对变量赋值赋值：将一个数据赋给一个变量。一般格式为： 变量名变量名 = 表达式表达式即把一个表达式的值赋给一个变量。“表达式”可以是算术表达式、关系表达式和逻辑表达式。赋值语句包括两部分操作：(1)进行表达式的运算，求出表达式的值；(2)将表达式的值赋给捐指定的变量。即“先运算后赋值”。 Dim sum1 As Double Dim price1 As Single, price2 As Single price1 = 198.6 price2 = 1386.95 * 0.8 sum1 = price1 * 23 + price2 * 5003.3 对象、属性、事件和方法的概念 3.3.1 VB中的对象中的对象VB程序中所使用的窗体、控件等都是对象。这些对象是系统预先设计好的，可以直接由编程人员调用的。 对象都具有静态特征（属性）和动态特征（行为）。说明：要使某个具有某些属性的对象实现某一种行为，说明：要使某个具有某些属性的对象实现某一种行为，应当对这个对象发送一个事件。应当对这个对象发送一个事件。 VB对象包括系统预先设定的窗体和控件，以及用户自定义对象。只有当控件被添加到窗体上，有了具体的属性值才成为真正的对象，能够识别特定的动作(如单击、双击等事件)。 3.3.2属性（属性（Property）属性：对象的特性。各种对象具有的属性不同的。例如，窗体有Picture属性(可以装入图片)，而文本框和没有Picture属性。设置属性值的方法主要有两种，（1）在设计阶段设置属性值选中一个对象后，可从窗体右侧的属性窗口中的属性表中找到所需要的属性行，然后从键盘输入该属性的值，或者用鼠标从系统给出的几种可能值之中选其中之一。注意：先激活指定的对象，然后在相应的属性窗口中选择属性。否则显示出来的属性表不是该对象的。 3.3.2属性（属性（Property）（2）在程序运行时设置或改变属性的值。 通过程序改变属性的值。其一般形式为： 对象名对象名.属性名属性名=属性值属性值 例如： Form1.Caption =“Visual Basic”注意一定要弄清楚给哪一个对象的属性赋值。不要写错对象名。如果省略对象名则隐含指窗体对象。 3.3.3事件（事件（Event）VB程序没有传统意义上的主程序。程序的运行并不要求从主程序开始。每个事件过程都由相应的“事件”触发而执行。各事件的发生顺序是任意的。只需针对一个事件编写出一段过程即可。 子程序称为过程。两类过程：事件过程和通用过程，此外还有函数。3.3.3事件（事件（Event）事件：由系统事先设定、能被对象识别和响应的动作。每一种对象能识别的事件是不同的。每一种对象所能识别的事件在设计阶段可以从该对象的代码窗口中右边过程框中的下拉列表中看出。在出现一个“事件”后，触发了一个相应的过程。在此过程中通过一些语句来实现相应的功能。3.3.4方法（方法（Method）VB中把一些常用的操作编写成一个个子程序，可直接调用-这些专用子程序称为“方法”(method)。例如Print就是一种方法，是用来输出信息的专用过程。说明：说明：“方法方法”是是VB中的一个术语，实际上是中的一个术语，实际上是VB提供的用来完成特定的操作的子程序。提供的用来完成特定的操作的子程序。“方法”的调用：应指明是哪个对象调用的。其调用格式如下： 对象名对象名.方法名方法名每一种对象所能调用的“方法”是不同的，这些是都由系统定义的。3.3.4方法（方法（Method）请仔细区分属性、事件和方法三者的含义和用法。属性和方法的使用方法在形式上有些类似，但使用上有区别：（1）调用方法 对象名.方法名例如：Form1. Print “您好，欢迎您”（2）使用属性 对象名.属性名 例如：Form1.Caption=“VB”3.4 窗体的属性窗体的属性1Name属性属性Name：窗体的名称名称属性，使程序能够识别窗体。2Caption属性属性Caption：窗体的标题，标题，是显示在窗体标题栏上的文字。3ControlBox属性属性ControlBox：用于设置窗体窗口是否包含“关闭窗体”的按钮及功能。4BackColor属性属性BackColor：用于设置或改变窗体的背景颜色背景颜色。颜色是一个十六进制的常量。可以通过调色板设置。3.4 窗体的属性窗体的属性5BorderStyle属性属性BorderStyle：用于设置窗体边框的类型边框的类型。6Enabled属性属性Enabled：用于设置窗体是否能够响应鼠标或键盘事件。7MaxButton和和MinButton属性属性MaxButton和MinButton：分别用于设置窗体的右上角是否显示最大化按钮和最小化按钮。8Visible属性属性Visible：设置窗体是否可见窗体是否可见，它有两个值可供选择：True（窗体可见）、False（窗体不可见）。3.5 窗体的方法窗体的方法1Show方法方法Show方法用于显示窗体。当一个程序中包含多个窗体时，一般要使用Show方法显示窗体。2Hide方法方法Hide方法用于隐藏指定的窗体，使其不在屏幕上显示，但是，该窗体仍在内存中。3Cls方法方法Cls方法用来清除由Print方法在窗体或图片框中显示的文本或使用作图方法在窗体或图片框中显示的图形。3.5 窗体的方法窗体的方法4Move方法方法使用Move方法可以使对象（时钟不包括在其中）移动，同时也可以改变被移动对象的尺寸。5Print方法方法Print方法可以在窗体和图片框上显示文字，也可以在打印机(Printer)上输出。3.6 窗体的事件窗体的事件1Click事件事件Click事件是单击鼠标左键时所发生的事件。当单击窗体上任一位置时，就会触发窗体的单击事件Form_Click。2DblClick事件事件在窗体上快速击两下鼠标按钮时，就会产生DblClick（双击）事件。需要注意的是双击鼠标的操作，实际上触发了两个事件，第1次按鼠标左键，产生Click事件，第2次产生DblClick事件。3.6 窗体的事件窗体的事件3Load事件事件Load事件是把窗体装载到工作区的事件，用于在启动程序时，初始化属性和变量。运行程序时，如果存在一个Form_Load过程，就首先执行这个过程。如果这个过程中没有任何语句，则直接显示该窗体。4Unload过程过程Unload过程是卸载事件。程序运行时，如果关闭窗体，就会触发Unload事件。一般在进行应用系统开发时，把退出系统之前需要处理的一些工作，如保存数据等操作，写在Unload事件过程中。本章结束了！不要忘了上机！