VB程序设计第四章程序设计基础课件.ppt

我们将计算机能够处理的数值、我们将计算机能够处理的数值、文字、声音、图形、图像等各类文字、声音、图形、图像等各类信息统称为数据，根据数据所描信息统称为数据，根据数据所描述信息的含义，又将数据分为不述信息的含义，又将数据分为不同的种类，即为数据类型。同的种类，即为数据类型。数数 据据 类类 型型 数据类型不同的数据，在内存中的存数据类型不同的数据，在内存中的存储结构不同，占用的空间也不同。对于储结构不同，占用的空间也不同。对于不同的程序设计语言，数据类型的规定不同的程序设计语言，数据类型的规定和处理方法也不相同。和处理方法也不相同。基本数据类型：数值型、日期型、字基本数据类型：数值型、日期型、字节型、货币型、逻辑型、字符串型、节型、货币型、逻辑型、字符串型、对象型、变体型等等。对象型、变体型等等。VBVB的数据类型有两类：基本数的数据类型有两类：基本数据类型和用户自定义类型。据类型和用户自定义类型。VBVB允许用户用允许用户用TypeType语句创建自语句创建自己需要的数据类型，称为用户己需要的数据类型，称为用户定义类型。定义类型。数数 值值 型型 数数 据据VBVB的数值型数据分别有整型、浮的数值型数据分别有整型、浮点型、货币型和字节型，其中，点型、货币型和字节型，其中，整型又有整型和长整型之分，浮整型又有整型和长整型之分，浮点型有单精度浮点和双精度浮点点型有单精度浮点和双精度浮点两种。两种。1.1.整型（整型（IntegerInteger，类型符，类型符%）整整型型是是指指不不带带小小数数点点和和指指数数符符号号的的数数。整整型型数数在在内内存存中中占占2 2个个字字节节，十十进进制制整整型型数数的的取取值值范范围围为为：-32768-32768 +32767+32767，在机器内以二进制补码表示。在机器内以二进制补码表示。VBVB中中 整整 型型 数数 的的 表表 示示 形形 式式 为为：n%n%，n n为数字，为数字，%为类型符。为类型符。如如：1212，-345-345，678%678%都都是是整整数数型型；而而45678%45678%会会发发生生溢溢出出错错误误，因因为为它它超超出出了了整整型型的的取取值值范范围围，此此时时应应该该采采用用长长整整型型或或浮浮点点型型数来表示。数来表示。2 2长整型（长整型（LongLong，类型符，类型符&）长长整整型型数数在在内内存存中中占占4 4个个字字节节，十十进进制制长长整型数的取值范围为：整型数的取值范围为：-2147483648-2147483648 +2147483647+2147483647。长整型数的表示形式：长整型数的表示形式：n&n&如：如：123456123456，3456789&3456789&等都是长整数型。等都是长整数型。3 3单精度浮点型（单精度浮点型（SingleSingle，类型，类型符符!）浮浮点点数数又又称称为为实实型型数数，是是指指带带有有小小数数点点或或写写成成指指数数形形式式的的数数。浮浮点点数数表表示数的范围大，但是存在误差。示数的范围大，但是存在误差。单单精精度度浮浮点点数数在在内内存存中中占占4 4个个字字节节，有有效效数数字字精精确确到到7 7位位十十进进制制数数。单单精度浮点数的表示形式有以下几种：精度浮点数的表示形式有以下几种：n.nn.n、n!n!、nEmnEm、n.nEmn.nEm其其中中，n n、m m为为无无符符号号整整数数，E E或或e e表示指数，表示指数，!为类型符。为类型符。如如：-1.2-1.2，34.5634.56！，1.23E-41.23E-4，.1234e12.1234e12等都表示浮点数。等都表示浮点数。4 4双精度浮点型（双精度浮点型（DoubleDouble，类型，类型符符#）双双精精度度浮浮点点数数在在内内存存中中占占8 8个个字字节节，有有效效数数字字精精确确到到1616位位十十进进制制数数，其其表表示示形式为：形式为：n.nn.n、n#n#、nDmnDm、n.nDmn.nDm、n.nEm#n.nEm#等。等。如如：34.56#34.56#，1.23D-41.23D-4，.1234e12#.1234e12#等都表示浮点数。等都表示浮点数。5 5货币型（货币型（CurrencyCurrency，类型符，类型符）货货币币型型数数据据专专门门用用来来表表示示货货币币值值，以以定定点点实实数数或或整整数数表表示示，整整数数部部分分为为1515位位，可可以以精精确确到到小小数数点点后后4 4位位，在在内存中占内存中占8 8个字节。个字节。货货币币型型数数据据的的表表示示形形式式为为数数字字后后加加 符号，符号，例如：例如：13.5613.56、6565。需需要要注注意意的的是是，虽虽然然货货币币型型数数据据与与浮浮点点数数都都是是带带小小数数点点的的数数，但但是是它它们们是是有有区区别别的的，前前者者小小数数点点是是固定的，而后者小数点是浮动的。固定的，而后者小数点是浮动的。例如，我们计算例如，我们计算1+11+1，有可能，有可能得到的结果却是得到的结果却是1.999999991.99999999。而如果是而如果是CurrencyCurrency类型的数据是用类型的数据是用十进制进行运算，因而计算结果是十进制进行运算，因而计算结果是非常精确的。非常精确的。6 6字节型（字节型（ByteByte）字字节节型型数数据据在在内内存存中中占占1 1个个字字节节，取取值值范范围围：0 0255255，一一般般用用于存储二进制数。于存储二进制数。用于存放字符型数据，字符是由用于存放字符型数据，字符是由西文字符和汉字组成，字符数据必西文字符和汉字组成，字符数据必须用双引号括起来。一个西文字符须用双引号括起来。一个西文字符占占1 1个字节，一个汉字占个字节，一个汉字占2 2个字节。个字节。如如：”Visual”Visual Basic”Basic”，”VB”VB程程序序设设计计”，”123”123”等等都都表表示示字字符符型数据。型数据。7 7、字符类型（、字符类型（StringString，类型符，类型符$）说明：说明：1 1双双引引号号为为分分界界符符，输输入入和和输输出时并不显示；出时并不显示；2 2字字符符串串中中包包含含字字符符的的个个数数称称为字符串长度；为字符串长度；3 3长长度度为为零零的的字字符符串串称称为为空空字字符串；符串；4 4字字符符串串中中包包含含的的字字符符区区分分大大小写。小写。8、日期型数据日期型数据 （DateDate）日期型数据在内存中占日期型数据在内存中占8 8个字节，个字节，以浮点数形式存储。日期的表示范以浮点数形式存储。日期的表示范围为：围为：100100年年1 1月月1 1日到日到99999999年年1212月月3131日，时间表示范围为：日，时间表示范围为：0000：0000：00002323：5959：5959。日日期期型型数数据据的的表表示示必必须须用用#括括起起来来，可可以以用用“/”“/”、“，”、“-”“-”分分隔隔开开，顺顺序序可可以以是是年年、月月、日日，也也可可以以是是月月、日日、年年。但但时时间间必必须须用用“：”分分隔隔，顺序是时、分、秒。顺序是时、分、秒。如：如：#September,11,2005#September,11,2005#、#2005-09-11#2005-09-11#、#10:30:00 AM#10:30:00 AM#、#09/11/2005 10:30:00 AM#09/11/2005 10:30:00 AM#9 9、逻辑型（逻辑型（BooleanBoolean）又称为布尔型，主要用于逻辑判断，又称为布尔型，主要用于逻辑判断，在内存中占在内存中占2 2个字节。逻辑型数据的个字节。逻辑型数据的取值只有两种：取值只有两种：TrueTrue（真）和（真）和FalseFalse（假）。（假）。进进行行数数据据转转换换时时，如如果果将将逻逻辑辑型型数数据据转转换换成成数数值值型型数数据据，则则TrueTrue转转换换为为-1-1，FalseFalse转转换换为为为为0 0；如如果果把把其其它它类类型型数数据据转转换换为为逻逻辑辑型型数数据据时时，非非0 0的的数数据据转转换换为为TrueTrue，0 0转转换换为为FalseFalse。1010、对象型数据（对象型数据（ObjectObject）在前面我们已经介绍了对象在前面我们已经介绍了对象的概念，那么，对象型数据的概念，那么，对象型数据可以用来表示应用程序中的可以用来表示应用程序中的图形、图形、OLEOLE对象或其他对象，对象或其他对象，它在内存中占它在内存中占4 4个字节。个字节。11、变体类型（变体类型（VariantVariant）变体类型是一种特殊的数据变体类型是一种特殊的数据类型，具有很大的灵活性，类型，具有很大的灵活性，可以表示多种数据类型，包可以表示多种数据类型，包括数值型、字符型、日期型括数值型、字符型、日期型等，其最终的类型由赋予它等，其最终的类型由赋予它的值来确定。的值来确定。1212、用户定义类型、用户定义类型自定义数据类型的一般形式为：自定义数据类型的一般形式为：Private Private|Public Public Type Type 自自定定义义类类型型名名 成员名成员名1 As 1 As 数据类型数据类型 成员名成员名2 As 2 As 数据类型数据类型 成员名成员名3 As 3 As 数据类型数据类型 成员名成员名n As n As 数据类型数据类型End TypeEnd Type 常量常量形式：形式：Const Const 常量名常量名 AS AS 类型类型=表表达式达式省略省略 AS AS 类型类型,常量的类型由表常量的类型由表达式值的类型决定；为了与变量名达式值的类型决定；为了与变量名区分，一般常量名使用大写字母区分，一般常量名使用大写字母例例 Const MAX=100 Const MAX=100变量变量变量：在程序运行中其存储的变量：在程序运行中其存储的值可以改变。值可以改变。常量：在程序运行中其值不可常量：在程序运行中其值不可以改变。以改变。变量和常量的命名规则：变量和常量的命名规则：1.1.以字母或汉字开头，后可跟汉字、以字母或汉字开头，后可跟汉字、字母、数字或下划线组成，长度小字母、数字或下划线组成，长度小于等于于等于255255个字符；个字符；2.2.不要使用不要使用VBVB中的关键字；中的关键字；3.VB3.VB中不区分变量名的大小写。中不区分变量名的大小写。4.4.为了增加程序的可读性，可在变为了增加程序的可读性，可在变量名前加一个缩写的前缀来表明该量名前加一个缩写的前缀来表明该变量的数据类型。变量的数据类型。变量的声明：变量的声明：1.1.用用DimDim语句显式声明变量语句显式声明变量 形式形式:Dim :Dim 变量名变量名 AS AS 类型类型 Dim Dim 变量名类型符变量名类型符例：例：Dim intCount As integer Dim intCount As integer,sngSum As single,sngSum As single 等价于等价于 Dim intCount%,Dim intCount%,sngSum!sngSum!2.2.隐式声明隐式声明 未进行上述的声明而直接使用，未进行上述的声明而直接使用，其类型为其类型为 Variant Variant 类型。类型。注意注意:在通用声明处加在通用声明处加 Option Option Explicit Explicit 语句可强制显式声明语句可强制显式声明变量。变量。局部变量模块变量全局变量变量的作用域：变量的有效范变量的作用域：变量的有效范围围 1.1.局部变量：在一个过程内部声明的局部变量：在一个过程内部声明的变量，只能在本过程中使用。变量，只能在本过程中使用。（在（在不同过程中可以定义相同名字的局不同过程中可以定义相同名字的局部变量）部变量）形式：形式：Dim Dim 变量名变量名 As As 类型类型 Static Static 变量名变量名 As As 类型类型 例：统计并输出单击窗体的次数。例：统计并输出单击窗体的次数。Private Sub Form_Click()Dim intX As Integer intX=intX+1 Print intXEnd Sub请思考：请思考：如果将如果将Dim 改为改为static，结果又如，结果又如何？何？2.2.模块变量：模块变量：在一个模块的在一个模块的“通用声通用声明明”段中用段中用DimDim语句或用语句或用PrivatePrivate语语句声明的变量句声明的变量,可被本模块中的任何可被本模块中的任何过程访问。过程访问。例：例：Private a As Integer,b As Private a As Integer,b As IntegerInteger Private Sub Command1_Click Private Sub Command1_Click()()Dim intTemp As Integer Dim intTemp As Integer a=3:b=10 a=3:b=10 Print 交换前交换前a、b的值：的值：;a;b intTemp=a:a=b:b=intTemp End Sub Private Sub Command2_Click()Print 交换后交换后a、b的值：的值：;a;b End Sub3.3.全局变量：全局变量：在标准模块中的声明段中用在标准模块中的声明段中用PublicPublic语句或语句或GlobalGlobal语句声语句声明的变量，可被本应用程序明的变量，可被本应用程序的任何过程或函数访问。的任何过程或函数访问。（只能在标准模块中声明，（只能在标准模块中声明，不能在过程和窗体模块中声不能在过程和窗体模块中声明）明）4、默认声明、默认声明 在程序中直接给出变量而不事先说在程序中直接给出变量而不事先说明，只适用局部变量，模块级变量明，只适用局部变量，模块级变量和全局变量必须在代码窗口中用和全局变量必须在代码窗口中用Dim或或Public语句声明语句声明注：使用默认声明容易产生混淆，注：使用默认声明容易产生混淆，因此对于变量最好先声明后使用。因此对于变量最好先声明后使用。1 1、常用数学函数、常用数学函数函数函数说明说明示例示例返回值返回值Abs(x)Abs(x)求求x x绝对值绝对值Abs(-4)Abs(-4)4 4求求e e为底，为底，x x为指数的为指数的指数指数Exp(1)Exp(1)2.71832.7183求求x x的平方根的平方根Sqr(9)Sqr(9)3 3返回返回x x的符号的符号Sgn(4)Sgn(4)1 1Round(x,Round(x,n)n)X X四舍五入，保留四舍五入，保留n n位位小数小数Round(5.34Round(5.346,2)6,2)5.355.35Exp(x)Exp(x)Sqr(x)Sqr(x)Sgn(x)Sgn(x)2、常用的转换函数：、常用的转换函数：函数函数说明说明示例示例返回值返回值Int(x)Int(x)求不大于求不大于x x的最大数的最大数 Int(-4.2)Int(-4.2)-5-5Fix(x)Fix(x)取取x x的整数位的整数位Fix(-4.7)Fix(-4.7)-4-4Asc(x$)Asc(x$)返回返回返回返回x x中第一个字母的中第一个字母的中第一个字母的中第一个字母的ASCIIASCII码码码码Asc(“abc”)Asc(“abc”)9797Chr(x)Chr(x)返回返回返回返回ASCIIASCII码值为码值为码值为码值为x x的字符的字符的字符的字符Chr(110)Chr(110)“n”“n”Str(x)Str(x)把把把把x x转换为字符串类型转换为字符串类型转换为字符串类型转换为字符串类型Str(23.4)Str(23.4)“23.4”“23.4”Val(x)Val(x)x x转换为数值类型转换为数值类型转换为数值类型转换为数值类型Val(“45ab”Val(“45ab”)4545Cint(x)Cint(x)小数转换为整，取整小数转换为整，取整小数转换为整，取整小数转换为整，取整Cint(-4.7)Cint(-4.7)-5-5Lcase(x)Lcase(x)X X转换为小写字母转换为小写字母转换为小写字母转换为小写字母Lcase(AbCLcase(AbC)abcabcUcase(x)Ucase(x)X X转换为大写字母转换为大写字母转换为大写字母转换为大写字母Ucase(abc)Ucase(abc)ABCABC3 3、日期时间函数：、日期时间函数：函数函数说明说明例例返回值返回值Date$()Date$()返回系统当前日期返回系统当前日期datedate2009-12-72009-12-7time$()time$()返回系统当前时间返回系统当前时间timetime2:30:30P2:30:30PMMnownow返回系统当前时间返回系统当前时间和日期和日期NOWNOWYear(N)Year(N)返回指定日期年份返回指定日期年份Month(N)Month(N)返回指定日期月份返回指定日期月份Day(N)Day(N)返回指定日期某一日返回指定日期某一日Weekday(Weekday(N)N)返回指定日期的星返回指定日期的星期期4 4、随机函数（、随机函数（Rnd(N)Rnd(N)）Rnd Rnd函数返回函数返回0 0和和1 1（包括（包括0 0但不包括但不包括1 1）之间的双精度随机数）之间的双精度随机数.每次运行时，要产生不同序列的随每次运行时，要产生不同序列的随机数，执行机数，执行Randomize(x)Randomize(x)语句。语句。例产生例产生1-1001-100的随机数的随机数:Int(Rnd:Int(Rnd*100)+1*100)+1产生产生101020 之间的随机整数：之间的随机整数：int(20-10+1)*Rnd+10)int(20-10+1)*Rnd+10)产生随机的小写字母：产生随机的小写字母：Chr(Int(122-97+1)*Rnd+97)Chr(Int(122-97+1)*Rnd+97)转换函数转换函数 Chr(66)B Chr(66)B Asc(B)66 Asc(B)66 Asc(Chr(99)99 Asc(Chr(99)99 Chr(Asc(K)K Chr(Asc(K)K Ucase$(abcdefg)Ucase$(abcdefg)ABCDEFGABCDEFG3.3.日期函数日期函数TimeTime返回系统时间返回系统时间DateDate返回系统日期返回系统日期NowNow返回系统日期和时间返回系统日期和时间 DateAddDateAdd（要增减日期形式，增减量，（要增减日期形式，增减量，要增减的日期变量）要增减的日期变量）DateDiffDateDiff（要间隔日期形式，日期（要间隔日期形式，日期1 1，日期日期2 2）例如：例如：计算你离毕业还有多少天计算你离毕业还有多少天:DateDiff DateDiff（d,date,#2007/07/01#d,date,#2007/07/01#）4.4.字符串编码和函数字符串编码和函数(1)(1)字符串编码字符串编码 Windows Windows系统对字符采用了系统对字符采用了DBCSDBCS编码编码,中文中文2 2字节字节,西文西文1 1字节字节 VB VB中字符中字符UnicodeUnicode编码编码,任何字符任何字符2 2字节字节.Len(“Len(“中国中国good”)good”)为为6 LenB(“6 LenB(“中国中国good”)good”)为为1212 StrConv()StrConv()进行进行DBCSDBCS与与UnicodeUnicode之间转换之间转换 .(2)(2)字符串函数字符串函数 Mid$(ABCDEFG,2,3)BCD Mid$(ABCDEFG,2,3)BCD InStr(2,ABCDEFG,EF)5 InStr(2,ABCDEFG,EF)5 S=Split(123,56,ab,)S=Split(123,56,ab,)S(0)=123”,S(1)=56”,S(2)=abS(0)=123”,S(1)=56”,S(2)=ab Join(S,)123 56 ab Join(S,)123 56 ab Replace(ABCDABCD,CD,123)Replace(ABCDABCD,CD,123)AB123AB123”AB123AB123”2.2.字符串运算符：字符串运算符：、+字符串连接字符串连接 123 +456 123 +456 结果结果 123456 123456 123&456 123&456 结果结果 123456 123456 区别区别:“+”:“+”两边必须是字符串两边必须是字符串,而而“&”“&”不一定。不一定。例如例如:abcdef&12345 abcdef&12345 结果为结果为 abcdef12345 abcdef12345 abcdef +12345 abcdef +12345 出错出错 123&456 123&456 结果为结果为 123456 123456 “123”+456 “123”+456 结果为结果为 579 579第一：第一：123+True 123+True 结果为结果为 122 122 True True转换为数值转换为数值-1-1，FalseFalse转换为数转换为数值值0 0第二：在字符串变量后使用第二：在字符串变量后使用“”时，时，应该在变量名与应该在变量名与“”之间加一个空之间加一个空格，否则该变量将被视作长整型变量，格，否则该变量将被视作长整型变量，从而导致错误。从而导致错误。注意：注意：3 3关系运算符关系运算符 将两个操作数进行大小比较将两个操作数进行大小比较,结果为逻辑量。结果为逻辑量。字符串比较字符串比较,则按字符的则按字符的ASCIIASCII码值从左到右一码值从左到右一一比较一比较,直到出现不同的字符为止直到出现不同的字符为止.。关系运算符关系运算符IsIs：用于判定两个用于判定两个ObjectObject类型的变类型的变量是否引用同一个对象。量是否引用同一个对象。例如例如 ：Dim a As Object,b As Object Dim a As Object,b As Object Dim c As Boolean Dim c As Boolean Set a=Command1 Set a=Command1 Set b=a Set b=a c=a Is b c c=a Is b c的值为的值为TrueTrue关系运算符关系运算符LikeLike：用于判断左边的字符串是否与右边用于判断左边的字符串是否与右边的字符串匹配。右边的字符串可以的字符串匹配。右边的字符串可以包含通配符包含通配符*、#和？等。和？等。c=Visual Like c=Visual Like V*lV*lc=F Like!A-Zc=F Like!A-Zc=VB6 Like VB#c=VB6 Like VB#c=VB6 Like V?6c=VB6 Like V?6 结果：结果：TrueTrue False False True True True True4.4.逻辑运算符逻辑运算符 将操作数进行逻辑运算，结果是逻辑将操作数进行逻辑运算，结果是逻辑值值 条件表达式条件表达式1 And 1 And 条件表达条件表达式式2 2 条件表达式均为条件表达式均为T T 结果为结果为T T 条件表达式条件表达式1 Or 1 Or 条件表达式条件表达式2 2 条件表达式有一个条件表达式有一个T T 结果为结果为T T表达式 1.1.组成：变量、常量、函数、运算符和圆括号组成：变量、常量、函数、运算符和圆括号 2.2.书写规则书写规则 (1)(1)运算符不能相邻。例运算符不能相邻。例a+-ba+-b是错误的。是错误的。(2)(2)乘号不能省略。例乘号不能省略。例x x 乘以乘以y y 应写成：应写成：x*yx*y (3)(3)括号必须成对出现，均使用圆括号。括号必须成对出现，均使用圆括号。(4)(4)表达式从左到右在同一基准上书写，无高低、表达式从左到右在同一基准上书写，无高低、大小。大小。3.3.不同数据类型的转换不同数据类型的转换 运算结果的数据类型向精度高的数据类型靠运算结果的数据类型向精度高的数据类型靠.IntegerLongSingleDoubleCurrency IntegerLongSingleDouble=字符运算符字符运算符 关系运算符关系运算符 逻辑运算逻辑运算表达式书写举例 sin(45*3.14/180)+(exp(10)+log(10)/sqr(x+y+1)sin(45*3.14/180)+(exp(10)+log(10)/sqr(x+y+1)a*b*c*d/e/f/g 或 a*b*c*d/（e*f*g）例：用人单位招聘秘书：年龄小于40岁的女性，学历专科或本科。例：表示算术表达式：正确的VB表达式：3=x And x=7 错误的VB表达式：3=x=7 或 3=x Or x=7 考虑：若分别写成：年龄40 And 性别=“女”And (学历=“专科”And 学历=“本科”)年龄40 Or 性别=“女”Or (学历=“专科”Or 学历=“本科”)常见错误常见错误1.1.使用中文标点符号使用中文标点符号 系统产生系统产生“无效字符无效字符”,”,以红色显示以红色显示2.2.字母和数字形状相似字母和数字形状相似 小写字母小写字母“l”“l”和数字和数字“1”“1”形式相同、小写字形式相同、小写字母母“o”“o”与数字与数字“0”“0”。3.3.对象名称对象名称(Name)(Name)属性写错属性写错 Text1 Text1、Text2Text2、Command1Command1 txtInput txtInput、txtOutputtxtOutput、cmdOkcmdOk4.对象的属性名、方法名、标准函数名写错 尽量使用自动列出成员功能。正确的系统按规定的大小写表示。5.无意形成控件数组 建立控件时小心使用“复制”、“粘贴”按钮6.打开工程时找不到对应的文件 保存文件时先保存窗体.frm文件、再保存.vbp文件，注意路径。