VB程序设计案例教程-第二讲

项目二设计入门（时间：4学时）教学目标：掌握VB的基本数据类型和变量定义方法，了解变体数据类型的含义及赋值。教学重点：变量定义方法及赋值教学难点：典型数据类型的应用；符号常量及常量的表示；变量的概念与作用域2.1面向对象程序设计基本概念2.2数据类型2.3常量与变量2.4任务1长方体的表面积和体积的求解2.5任务2求圆的面积、周长、球面积、球体积2.1面向对象程序设计的基本思想面向对象编程（ObjectOrientedProgramming，简称OOP）方法是一种用对象分析、设计并编写应用程序的方法，是一种试图模仿人们建立现实世界的程序设计方法。一、类与对象TextBox类CommandButton类CommandButton对象TextBox对象二、对象属性

对象的特征用数据来表示，用于描述对象的数据称作对象的属性每一种对象都有一组特定的属性，根据需要它们可以在窗体的布局操作中完成，也可以在程序运行中改变。对象名.属性名=属性值Label1.Caption=''欢迎使用VB''名称（Name）控件标题（Caption）顶边（Top）左边（Left）高度（Height）宽度（Width）颜色（Color）是否可见（Visible）字体（FontName）大小（FontSize）粗体（FontBold）斜体（FontItalic）下划线（FontUnderLine）删除线（FontStrikethru）三、对象事件事件发生在用户与应用程序交互时，如：单击控件(Click)、键盘按下（KeyPress）、移动鼠标(MouseMove)等；有部分事件由系统产生，不需要用户输入，如计时器事件。VB应用程序设计的主要工作就是为对象编写事件过程中的程序代码。事件过程的形式如下：Sub对象名_事件([参数列表])… '事件过程代码EndSub四、对象的方法在VisualBasic中已将一些通用的过程和函数编写好并封装起来，作为方法供用户直接调用，这给用户的编程带来了很大的方便。每个方法完成某个功能，但其实现步骤和细节用户既看不到、也不能修改，程序员能做的工作就是按照约定直接调用它们，即使用各种对象的方法，只须了解它们的功能和用法，无需知道其中的奥秘。对象方法的调用格式为：

[对象.]方法[参数名表]其中，若省略了对象，表示为当前对象，一般指窗体。例如：picture1.Print''春节愉快!'' 一个对象建立以后，其操作就通过与该对象有关的属性、方法和事件来描述。它们构成了对象的三要素，可以把属性看作一个对象的性质，把事件看作对象的响应，把方法看作对象的动作。

标准数据类型分为：基本数据类型可分为6类：数值型、日期型、逻辑型、字符型、对象型和变体型，其中数值型数据又包括：整型、长整型、单精度型、双精度型、货币型和字节型。2.2数据类型

一、数值型Numeric数值型：数值型又分为整型和实型。其具体的分类如下图所示：字节型（Byte）整型整型(Integer)长整型(Long)数值型

单精度型(Single)实型双精度型(Double)货币型(Currency)1．整数（1）整形用于保存整数，整数运算速度快，但所表示数的范围小。其中整型Integer的取值范围是：－32768～32767，占2个字节，类型符是％号。（2）长整型Long的取值范围是：－2147483648～2147483647，占4个字节，类型符是&号。（3）字节型字节型（Byte）用于存储二进制数，取值范围0～255，占1个字节。例如：2%表示2以整型数据存储。例如：5&表示5为长整型数据存储。

2．浮点型（1）单精度型Single用于保存浮点实数，其取值范围是±1.4E－45～±3.4E38，占4个字节，类型符是！号。（2）双精度型Double也用于保存浮点实数，但所保存数值的精确度比Single高，其取值范围是：±4.9E－324～±1.8E308，占8个字节，类型符是#号。Double是应用程序中存贮数据的常用类型。例如：3.6e+5表示数学中的3.6×105，7.45E-6表示7.45×10-6

（3）货币型货币型Currency型用于存储定点实数或整数，占8个字节，在所表示的数后会自动增加@符号。

例如：23.5@表示23.5以货币型数据存储。

注意：我们在编程时首先要学会根据自己的需要定义数值类型，范围要适度，过大则无谓占用内存还影响运行速度，太小则会出现溢出错误。二、字符串型（String）

字符串型用于存放字符类型数据，字符类型数据可以是英文字母、数字字符和其他一些字符以及汉字等。（1）String型数据必须用双引号前后括起来，占8个字节，类型符是$号。（2）分为可变长度字符串和固定长度字符串。固定字符串最大取值范围为65535字节；变长字符串最大取值范围为0～231,定义变长字符串时，其后加上"*"和数字，表示该字符串的长度为该数字表示的字节数，例：DimaAsString*6，表示定义变量a是一个6个字符的定长字符串数据，字符串长度不可变化。DimsAsString。【示例】显示不同类型字符串。“”表明长度为零的字符串为空字符串；“VisualBasic”表明为字母字符串，赋予变量为“VisualBasic”；“Hello,World2008。”表明为混合字符串。三、布尔型Boolean

布尔型也称逻辑型。布尔型用于存放逻辑判断的结果，它只有True与False两个值。比如，比较两个数a>b，若满足，其值为True，否则结果为False。说明：（1）当逻辑数据转换为整型数据时，True转换为－1，False转换为0；（2）当把数值型数据转换为逻辑型数据时0转换为False，非0转换为True。

四、日期型（Date）

Date型按8个字节的浮点数进行存储，表示日期的范围从100年1月1日到9999年12月31日。说明：这种数据在引用时一定要用#号前后括起来，可用/-,进行分隔。如：#2004－02－24#。可以有以下形式#mm/dd/yyyy#，#yyyy/mm/dd#，#dd/mm/yyyy#，默认为#mm/dd/yyyy#。例如：#January1,2001#注意：显示与系统的格式（24小时制或是12小时制）是一致的。【例】Print#3/6/19931:20:00PM#1993-3-6下午01:20:00 系统时间为12小时制1993-3-613:20:00 系统时间为24小时制五、可变类型（Variant）

可变类型也称变体型，它是VB中使用最方便的一种数据类型。它可以根据程序的上下文解释数据的类型，以便使该数据参加不同数据类型的运算。变体型数据可以表示任何一种数据类型，其大小由所赋予的数据类型决定。例如：dimaAsVariant

'定义a为变体型数据a=123'a为整形数据a="visualbasic" 'a为字符型数据六、对象型（Object）

对象数据类型用来表示应用程序中的对象，可用Set语句来指定一个被声明为Object的变量，去引用应用程序中的任何实际对象。也可以用来引用图形图像、Word文件、Excel文件等。如果在运行应用程序之前，VisualBasic定义该特定类型对象的属性和方法，应用程序在运行时速度会更快。【例】SubForm_Click()DimTempAsObjectSetTemp=Form1EndSub于是，Temp即为对象类型，表示Form1七、用户自定义数据类型用户自定义数据类型是根据用户需要在已存在的基本数据类型基础上组合而形成的新的数据类型。格式：[Private|Public]Type用户自定义类型名元素名1As数据类型元素名2As数据类型……EndType元素名为自定义数据类型中的一个成员类型名为上述基本类型名或自定义数据类型名

定义语句应该放在标准模块或窗体模块的声明部分，在窗体的声明中定义Type语句应该指定Private，在模块中的声明部分定义Type语句默认Public。25例如，一个学生的信息可以定义为用户自定义的数据类型。根据需要，可以定义一个包括学生的学号（字符型数据）、姓名（字符型数据）、出生日期（日期型数据）等新的自定义数据类型以方便使用。PrivateTypeStudent SNoAsString*10 SNameAsString*10 SBirthAsData EndType262.3常量与变量在VisualBasic中，标识符是程序员为变量、常量、数据类型、过程、函数、类等定义的名字。标识符的命名规则标识符必须以字母开头，可以由字母、数字或下划线组成。标识符的长度不能超过255个字符，控件、窗体、类和模块的名字不能超过40个字符。自定义的标识符不能和VB中的运算符、语句、函数和过程名等关键字同名，同时也不能与系统已有的方法和属性同名。关键字是VB保留下来的作为程序中有固定含义的标识符，不能被重新定义（声明）。保证标识符在同一范围内是惟一的。2.3常量与变量一、常量在程序运行过程中其值始终保持不变的量称为常量。有两种形式的常量：直接常量和符号常量，其中符号常量又分为用户自定义和系统定义符号常量。1、直接常量在程序代码中，以直接明显的形式给出的数据称为直接常量。类型：字符串常量、数值常量、布尔常量、日期常量举例："欢迎使用VisualBasic6.0"‘字符串常量23456‘数值型常量12.06‘单精度常量True‘逻辑型常量#1/11/2006#‘日期型常量2、符号常量在程序中用一符号来代表一个常量，这样的符号称作符号常量。命名规则： ①必须以字母或汉字开头，由字母、汉字、数字或下划线组成，长度不大于255。②不能使用VB中的保留字。③不区分大小写。（1）用户自定义常量必须先定义后使用，一般用Const语句来定义。[Public|Private]Const常量名[类型符|As类型关键字]=表达式例如：ConstPIAsSingle=3.14159引用：y=sin(35*PI/180)符号常量不但可定义数值型常量，而且也能定义其他类型的常量。符号常量通常用大写字母表示，以区别于普通的变量名。（2）系统内部定义的符号常量由VB应用程序和控件提供的。这些常量可与应用程序的对象、方法和属性一起使用，在代码中可直接使用。系统常量位于对象库中，可通过“对象浏览器”查看。PrivateSubCommand1_Click()x=MsgBox("确定",vbOKCancel,"aaaa",10,100)EndSub在上述过程中，赋值语句中的vbOKCancel就是一个VB的系统常量。

二、变量在程序中，其值可以改变的量称为变量。变量名是变量的标识。变量名的命名遵从标识符命名原则。变量具有名称、类型和值三个属性。VB有两种类型变量：属性变量和一般变量属性变量是用户在设计界面时VB自动产生的，为每一个对象创建的一组变量，即属性变量，并为每个变量设置其默认值。在对象的【属性】窗格中列出了对象的属性变量名和对应的属性值。一般变量是由用户自己定义的变量。有显示声明和隐式声明两种定义变量常用Dim语句，格式如下：Dim变量名1[AS类型1][，变量名2[As类型2]]变量的命名规则：①以字母或汉字开头，后可跟汉字、字母、数字或下划线组成，长度小于等于255个字符；②不要使用VB中的关键字；③VB中不区分变量名的大小写；④变量名不能与过程名或符号常量同名；⑤变量名在同一个范围内必须是唯一的。用类型说明符表示变量将类型说明符放在变量名的尾部，可以表示不同的变量。例如：strName$ 表示字符串型变量dblNum% 表示整型变量curWage@ 表示货币型变量DimabcAsInteger，chr1AsString'定义abc为整型变量，定义chr1为字符串类型变量Dimmm '定义mm为可变类型变量Dimm1AsString*6 '定义m1为字符串类型变量，最多可存放6个字符或汉字Dimchr2$ '定义chr2为字符串变量DimTval#'定义Tval为双精度变量1、字符型（String）语句说明DimStr1,str2asStringStr1=”我是”str2=”学生”PrintStr1+str2定义str1,str2为字符串型变量str1被赋值为“我是”str2被赋值为“学生”显示“我是学生”语句说明DimStr1,str2asStringStr1=”123”str2=”123”PrintStr1+str2定义str1,str2为字符串型变量str1被赋值为123str2被赋值为123显示1231232、日期型（Date）语句说明Dimdate1,date2asDatedate1=#2008/8/8#date2=#2007/8/8#PrintDate1-Date2PrintDate2+365定义date1,date2为日期型变量date1被赋值为2008/8/8date2被赋值为2007/8/8显示366显示2008/8/73、逻辑型（Boolean）语句说明Dimbool1,bool2asBooleanBool1=TrueBool2=0Printbool1Printbool2定义bool1为逻辑型变量bool1被赋值为Truebool2被赋值为0显示True显示False(数字0做为逻辑型False)4.变体型（Variant）语句说明DimxasVariantx=3.1415926PrintxX=