VB程序设计基础(4)课件.ppt

《VB程序设计基础(4)课件.ppt》由会员分享，可在线阅读，更多相关《VB程序设计基础(4)课件.ppt（79页珍藏版）》请在三一文库上搜索。

1、VB程序设计基础(4),1,第4章 VB程序设计基础,本章内容及要求：,4.1数据类型 4.2常量和变量 4.3变量的作用域 4.4常用内部函数 4.5字符处理与字符串函数 4.6运算符与表达式,VB程序设计基础(4),2,4.1 数据类型,数据是信息在计算机内的表现形式，也是程序处理的对象。VB提供了系统定义的基本数据类型，还允许用户定义自己的数据类型。,VB程序设计基础(4),3,4.1 数据类型,一、基本数据类型,1.字符串型String 字符串是一个字符序列，由ASCII字符组成。字符串通常要用双引号括起来。 例如：“Hello！” 湖南省衡阳市 “8888” *” “” 空字符串 “

2、 “ 有一个空格的字符串 若字符串中有双引号，例如ABD“XYZ，则用连续两个双引号表示，即：ABDXYZ“,VB程序设计基础(4),4,4.1 数据类型,VB中的字符串分为两种：变长字符串和定长字符串。 变长字符串的长度是不确定的，可以从0231（约21亿）个字符。 定长字符串含有确定个数的字符，最大长度不超过216（65535）个字符。,VB程序设计基础(4),5,4.1 数据类型,2.数值型 数值型数据分为整型数和浮点数两类。 （1）整型数 整型数是不带小数点和指数符号的数，在机器内部以二进制补码形式表示。正数的补码和它的二进制形式(即源码)相同；负数的补码为该数的绝对值的二进制形式取反

3、加1。 例如，整型数4,-4分别以下面的形式存放：（最高位为符号位，其中0为正，1为负） 4 -4 整数的运算速度快，而且比其他数据类型占据的内存少。,VB程序设计基础(4),6,4.1 数据类型,整型数又分为整数和长整数： 整数Integer 以2个字节(16位)的二进制数存储，取值范围为 -32,76832,767。 长整数Long 以4个字节(32位)的二进制数存储，取值范围为 -2,147,483,6482,147,483,647。,VB程序设计基础(4),7,4.1 数据类型,思考：为什么16位整数Integer的取值范围为-32,76832,767？,VB程序设计基础(4),8,4

4、.1 数据类型,注意：16位整数Integer如果超出了这个取值范围（-32,76832,767），数据便会溢出。请看下面的代码：,Private Sub Form_Load() Dim a As Integer a = 32767 a = a + 1 MsgBox a End Sub,VB程序设计基础(4),9,4.1 数据类型,（2）浮点数 浮点数也称实数，是带有小数部分的数值。分为单精度浮点数和双精度浮点数。 单精度Single 以4个字节(32位)存储，可以精确到7位十进制数。其中符号占1位，指数占8位，其余23位表示尾数，还有一个附加的隐含位。其负数的取值范围为-3.402823E+

5、38 -1.401298E-45，正数的取值范围为1.401298E-45 3.402823E+38。 表示形式为： n.nEm 其中n.n是尾数，m是指数（以10为底的幂） 例：-123.4E-3或-123.4e-3，相当于-0.1234 1.2345E3或1.2345e3，相当于1234.5,VB程序设计基础(4),10,4.1 数据类型,双精度Double 以8个字节(64位)存储，可以精确到15到16位十进制数。其中符号占1位，指数占11位，其余52位表示尾数，还有一个附加的隐含位。 表示形式为： n.nDm 其中n.n是尾数，m是指数（以10为底的幂） 例：123.4567D3或12

6、3.4567d+3，相当于123456.7,VB程序设计基础(4),11,4.1 数据类型,（3）货币型Currency 货币数据类型通常用于表示钱款。以8个字节(64位)存储，精确到小数点后面4位（小数点前面有15位）。在小数点后4位以后的数字将被舍去。其取值范围为-922,337,203,685, 477.5808 -922,337,203,685,477.5807 浮点数中的小数点是“浮动”的，小数点可以出现在数的任何位置，而货币型数据的小数点是固定的，因此称为定点数据类型。,VB程序设计基础(4),12,4.1 数据类型,（4）字节型Byte 以1个字节(8位)的无符号二进制数存储，其

7、取值范围为0255。 注：在实际应用中，应根据需要使用数据类型。能用整型就不要用浮点型或货币型；如果要求的精度不高，则应使用单精度变量。这样不仅节省内存空间，而且可以提高处理速度。,VB程序设计基础(4),13,4.1 数据类型,3.布尔型Boolean 布尔型数据是一个逻辑值，用2个字节存储，它只取两个值：True/False。布尔型变量的默认值为False。 将逻辑数据转换成整型时：True为-1，False为0；其它数据转换成逻辑数据时：非0为True, 0为False。 例如，下面的代码定义一个布尔型变量，并输出该变量： Dim mybln As Boolean mybln=3 Msg

8、Box mybln,VB程序设计基础(4),14,4.1 数据类型,4.日期型Date 日期型数据占用8个字节，以浮点数形式存储。小数点左边的数值表示日期(距离1899-12-30的天数)，小数点右边的数值表示时间。 日期型数据的日期表示范围：100年1月1日9999年12月31日，时间表示范围：0:00:0023:59:59。日期常数必须用“#”符号括起来。 例如：下面的几种日期型数据的格式都是合法的： #9/1/2009#或#2009-09-01# #September 1,2009# #08:30:00 AM# #2002-5-4 14:30:00 PM#,VB程序设计基础(4),15,

9、4.1 数据类型,5.变体型Variant 变体数据类型是一种可变的数据类型，可以表示任何值，包括数值、字符串、日期/时间等。 当变体数据为数值时，以16个字节存储，最大可达Double的取值范围；当变体数据为字符时，以22字节+字符串长，与变长String有相同的取值范围。 6.对象型Object 对象型数据作为32位（4个字节）地址来存储，该地址可以引用程序中的任何对象。,VB程序设计基础(4),16,4.1 数据类型,7.Decimal数据类型 Decimal数据以12个字节存储，最多支持29个有效数位，在内存中的表示形式比浮点数更精确。适用于要求使用大量有效的整数及小数位数，并且不能容

10、忍舍入误差的财务计算。 Decimal数据类型只能在变体类型(Variant)中使用，不能把一个变量声明为Decimal类型。,VB程序设计基础(4),17,4.1 数据类型,二、用户定义的数据类型,用户自定义类型，也称为记录类型，通过Type语句来实现，其语法格式如下： Type 数据类型名 元素名As 类型名 元素名As 类型名 End Type,VB程序设计基础(4),18,4.1 数据类型,例如: 对于一个学生的“学号”、“姓名”、“性别”、“年龄”、“入学成绩”等数据，为了处理数据的方便，常常需要把这些数据定义成一个新的数据类型（如Student类型） Type Student Xh

11、 As String Xm As String Xb As String Nl As Integer Score As Single End Type,二、用户定义的数据类型,VB程序设计基础(4),19,4.1 数据类型,使用Type语句，应注意以下几点： 1.记录类型的定义必须放在模块（包括标准模块和窗体模块）的声明部分，在使用记录类型之前，必须用Type语句加以定义。 2.一般情况下，记录类型在标准模块中定义，其变量可以出现在工程的任何地方。当在标准模块中定义时，关键字Type前可以有Public（默认）或Private；而如果在窗体模块中定义，则必须在前面加上关键字Private。 3

12、.在记录类型中不能使用动态数组。,VB程序设计基础(4),20,4.1 数据类型,下面的代码声明了一个Student类型变量st，然后为其各个元素赋初值，最后输出： Private Sub Form_Load() Dim st As Student st.Xh = 20050001 st.Xm = 王一 st.Xb = 男 st.Nl = 17 st.Score = 92.5 MsgBox 学号： Total End Sub,VB程序设计基础(4),39,4.3 变量的作用域,每个变量都有它的作用范围，即作用域。根据变量在VB应用程序中的定义位置和所使用的定义语句的不同，可以分为局部变量、模块

13、变量和全局变量。 VB应用程序的构成,VB程序设计基础(4),40,4.3 变量的作用域,在过程（事件过程或通用过程）内定义的变量叫做局部变量，其作用域是它所在的过程。因此，在不同的过程中可以定义相同名字的局部变量。 局部变量在过程内用Dim、Static定义，例如： Sub Command1_Click() Dim Tempnum As Integer Static Total As Double End Sub,一、局部变量Local,VB程序设计基础(4),41,4.3 变量的作用域,模块变量包括窗体变量和标准模块变量。 窗体变量可用于该窗体内的所有过程（事件过程或通用过程）。当同一窗体

14、内的不同过程使用相同的变量时，必须定义窗体层变量。 窗体层变量不能隐式声明。方法是：在程序代码窗口的“对象”框中选择“通用”，并在“过程”框中选择“声明”。 标准模块中模块层变量的声明和使用与窗体层变量类似。,二、模块变量Module,VB程序设计基础(4),42,4.3 变量的作用域,默认情况下，模块级变量对该模块中的所有过程都是可见的，但对其他模块不可见。模块级变量在模块的声明部分用Private、Dim声明。例如： Private intTemp As Integer 或 Dim intTemp As Integer,VB程序设计基础(4),43,4.3 变量的作用域,全局变量的作用域最

15、大，可以在工程的每个模块、每个过程中使用。全局变量必须在标准模块的声明部分中声明，不能在过程或窗体模块中声明；并且，全局变量必须用Public或Global语句声明，不能用Dim语句声明。例如： Public intNumber As Integer,三、全局变量Public,VB程序设计基础(4),44,4.3 变量的作用域,对于局部变量来说，可以不用Dim或Static定义，而是在需要时直接给出变量名（不建议）。 默认声明只适用于局部变量，模块级变量和全局变量必须用Dim或Public语句显式声明。 默认声明局部变量，有可能使程序出现无法预料的结果，而且较难查出错误。为了安全起见，最好能显

16、式地声明程序中使用的所有变量。 下面通过实例说明。,四、默认声明（隐式声明）,VB程序设计基础(4),45,4.4 常用内部函数,VB提供了上百种内部函数，要求掌握表4.4中常用函数的功能及使用：数学函数、转换函数、日期和时间函数、随机数函数。 函数调用方法： 函数名（参数列表） 有参函数 函数名 无参函数 说明： （1） 使用内部函数要注意参数的个数及其参数的数据类型； （2） 要注意函数的定义域（自变量或参数的取值范围）； （3）要注意函数的值域。,VB程序设计基础(4),46,4.4 常用内部函数,常用的数学函数有: Sin(x)Cos(x)Tan(x) Atn(x) Abs(x) Sg

17、n(x) Sqr(x)Exp(x) 说明： (1)在三角函数中的自变量是以弧度为单位。 如：sin300 sin(3.14159/180*30) (2) sqr(x)函数要求自变量 x=0 (3) Exp(x) 函数要求自变量x不能超过709.782712893，否则函数的值就会超出实数在计算机中的表示 范围，导致错误发生。,一、数学函数,VB程序设计基础(4),47,4.4 常用内部函数,常用转换函数见表4.4，相关说明如下： （1）要区别两个取整函数int()和fix() Fix(N)为截断取整，即去掉小数后的数。 Int(N)为不大于N的最大整数。 例如： Fix(9.59) =9, I

18、nt(9.59) =9 Fix(-9.59) =-9, Int(-9.59) =-10 （2）Asc(Abcd) 值为： 65 （只取首字母的AscII值） （3）Val(“abc123”) 值为：0, Val(1.2sa10) 值为1.2 注意： Val( )函数只将最前面的数字字符转换为数值。,二、转换函数,VB程序设计基础(4),48,4.4 常用内部函数,1. Date、Now、Time函数 Date函数：返回当前系统日期。语法： Date Now函数：返回当前系统日期和时间。语法： Now Time函数：返回当前系统时间。语法： Time 2. Year、Day、Month函数（年、

19、月、日） Year函数：返回年份。语法：Year(Now) Day函数：返回年份。语法： Day(Now) Month函数：返回年份。语法： Month(Now) 3. Hour、Minute、Second函数（时、分、秒） Hour函数：返回小时。语法： Hour(Now) Minute函数：返回分钟。语法： Minute(Now) Second函数：返回秒。语法： Second(Now),三、日期和时间函数,VB程序设计基础(4),49,4.4 常用内部函数,语法：Rnd(number) Rnd函数可以省略参数和括号。返回0 1)（即包括0，但不包括1）之间的单精度随机数。,四、随机数函数

20、Rnd,VB程序设计基础(4),50,4.4 常用内部函数,若要产生1100的随机整数，则可通过下面的表达式来实现： Int(Rnd*100)+1 包括1和100 Int(Rnd*99)+1 包括1，但不包括100 思考：怎样产生N，M区间的随机数？,Int(Rnd *(M-N+1)+N,VB程序设计基础(4),51,4.4 常用内部函数,当应用程序不断地重复使用随机数时，同一序列的随机数会反复出现，用Randomize语句可以消除这种情况，其格式为：Randomize ( x ) 功能：初始化随机数生成器。如省略参数，则用系统计时器返回的值作为新的种子值。 例如：下段程序每次运行，将产生不同

21、序列的20个10，99之间的随机整数。 Private Sub Form_click() Randomize For i = 1 To 20 Print Int(Rnd * 90) + 10; Next i Print End Sub,VB程序设计基础(4),52,4.5 字符处理与字符串函数,ANSI方式：早前的版本采用。西文字符用一个字节编码，中文字符用两个字节编码。一个中文字符相当于两个西文字符。 UniCode方式：4.0以后的版本采用。中西文字符统一编码，一个英文字符或一个汉字都看作一个字符，均用两个字节编码。 Print Len(BASIC程序设计) 9 Print LenB(“B

22、ASIC程序设计”) 18 注：VB6.0中，LenB 返回的是用于存储字符串的字节数，而不是返回字符串中字符的数量。,一、VB的字符处理机制,VB程序设计基础(4),53,4.5 字符处理与字符串函数,为了实现ANSI与UniCode之间的转换，VB提供了一个转换函数StrConv，格式如下： 新字符串=StrConv(待转换字符串,转换格式) 其中，“转换格式”可以取值为： vbUnicode（值为64） 将ANSI转换为 UniCode vbFromUnicode（值为128） 将UniCode转换为 ANSI 例4.1编写程序，测试StrConv函数功能。,一、VB的字符处理机制,VB

23、程序设计基础(4),54,4.5 字符处理与字符串函数,1.去空格函数 Ltrim$(字符串)：去除字符串左边的空白字符；$可以省略。 RTrim$(字符串) ：去除字符串右边的空白字符； Trim$(字符串)：去除字符串两边的空白字符。 例如： a$ = Good Morning b$ = LTrim$(a$) c$ = RTrim$(b$) Print b$; c$; ABC“ 输出结果：Good Morning Good MorningABC,二、字符串函数,VB程序设计基础(4),55,4.5 字符处理与字符串函数,2.字符串截取函数 左部截取：Left$(字符串,n) 返回字符串的前

24、n个字符。例：Left$(“ABCDEF”,4) 中部截取：Mid$(字符串, p , n ) 从第p个字符开始，向后截取n个字符。n可以省略，此时，将从第p个字符开始向后截取到字符串的末尾。 例如：Mid$(“ABCDEFGHIJK”,3,4) 右部截取：Right$(字符串,n) 返回字符串的最后n个字符。例：Right$(“ABCDEFGHIJK”,4),二、字符串函数,VB程序设计基础(4),56,4.5 字符处理与字符串函数,3.字符串长度测试函数 格式：Len(字符串)：返回字符串的长度（长整型值）。 Len(变量名)：返回存储变量所需的字节数。 例如：Len(“ABCDEFGHI

25、JK”)返回11 Len(testvar%) 返回2 Len(testvar!) 返回4 Len(testvar#)返回8,二、字符串函数,VB程序设计基础(4),57,4.5 字符处理与字符串函数,4. String$函数 格式：String$(n,ASCII码) 或String$(n,字符串) 当为ASCII码时，返回由该ASCII码对应的n个字符；当为字符串时，返回由第一个字符组成的n个字符。 例如： a$ = String$(5, 65) b$ = String$(5, -) c$ = String$(5, abcd) Print a$; b$; c$ 输出结果： AAAAA-aaaa

26、a,二、字符串函数,VB程序设计基础(4),58,4.5 字符处理与字符串函数,5.空格函数 格式：Space$(n) 返回n个空格。 例如： a$ = a + Space(4) + b“ 输出结果： ab,二、字符串函数,VB程序设计基础(4),59,4.5 字符处理与字符串函数,6.字符串匹配函数 格式：InStr( 首字符位置 , 字符串1 , 字符串2 , n ) 该函数在“字符串1”中查找“字符串2”，如果找到，就返回“字符串2”的第一个字符在“字符串1”中的位置。“字符串1”的第一个字符的位置为1。 例如： a$ = Microsoft Visual Basic x = InStr

27、(a$, Visual) Print x 输出结果： 11,二、字符串函数,VB程序设计基础(4),60,格式：InStr( 首字符位置 , 字符串1 , 字符串2 , n ) 说明： “字符串2”的长度必须小于65,535个字符； InStr的返回值是一个长整型数。在不同的条件下，函数的返回值也不一样（见表4.5）。 “首字符位置”是可选的。如果有，则从该位置开始查找，否则从起始位置开始查找。 自变量n是可选的，用来指定字符串比较方式。该自变量的取值可以是0、1或2。 0：进行二进制比较，区分字母的大小写；默认为0。 1：比较时忽略大小写； 2：对数据库中的信息进行比较。,VB程序设计基础(

28、4),61,4.5 字符处理与字符串函数,也可以通过语句限定： Option Compare Binary Option Compare Text Option Compare Database,VB程序设计基础(4),62,4.5 字符处理与字符串函数,7.字母大小写转换 格式：Ucase$(字符串)：小写字母转换为大写字母 Lcase$(字符串) ：大写字母转换为小写字母 例如：a$ = Microsoft Visual Basic b$ = UCase$(a$) c$ = LCase$(a$) Print b$, c$ 输出结果： MICROSOFT VISUAL BASIC micro

29、soft visual basic,二、字符串函数,VB程序设计基础(4),63,4.5 字符处理与字符串函数,8.插入字符串语句Mid$ 格式：Mid$(字符串 , 位置 , L )=子字符串 该语句把从“字符串”的“位置”开始的字符用“子字符串”代替。如果含有L自变量，则替换的内容是“子字符串”左部的L个字符。“位置”和L均为长整型数。 Dim MyString, FirstWord, LastWord, MidWords MyString = “Mid Function Demo” 建立一个字符串。 FirstWord = Mid(MyString, 1, 3) 返回 Mid。 Last

30、Word = Mid(MyString, 14, 4) 返回 Demo。 MidWords = Mid(MyString, 5) 返回 Funcion Demo。,VB程序设计基础(4),64,4. 运算符与表达式,运算是对数据的加工。最基本的运算形式常常用一些简洁的符号来描述，这些符号称为运算符。被运算的数据，称为运算量。由运算符和运算量组成表达式。运算量可以是常量，也可以是变量，还可以是函数。例如：A+3 , T+Sin(a) , PI*r*r 。 运算符和表达式的类型可以分为以下4种： 算术运算符与算术表达式 字符运算符与字符表达式 关系运算符与关系表达式 逻辑运算符与逻辑表达式,VB程

31、序设计基础(4),65,4. 运算符与表达式,一、算术运算符与算术表达式,（a=3）,VB程序设计基础(4),66,4. 运算符与表达式,1.幂运算 用于计算乘方和方根，运算符为“”。例如： 102结果为100 10-2 结果为0.01 250.5结果为5 8(1/3) 结果为2 注意：幂运算符优先级最高。当指数是一个表达式时，必须加上括号。 例如，X的Y+Z次方必须写作X(Y+Z)，不能写作XY+Z 。,VB程序设计基础(4),67,4. 运算符与表达式,2. “/”与 “” 浮点除法运算符“/”用来计算两个数或表达式的商，并返回相应的浮点数。 例如：3/2的值是1.5。 整数除法运算符“”

32、在运算前把两个运算量四舍五入转换成整数，然后计算两个运算量的商，并返回结果的整数部分。 例如：25.636.78的值为。,VB程序设计基础(4),68,4. 运算符与表达式,3.取模运算Mod 取模运算即求余数，在运算前把两个运算量四舍五入转换成整型数，然后对两个运算量进行除法运算，并返回余数（第一个操作数整除第二个操作数的余数）。例如： 7 Mod 4结果为3 25.68 Mod 6.99先把25.63和6.78转化为26和7，再求得余数为,VB程序设计基础(4),69,4. 运算符与表达式,4.算术运算符的优先级,VB程序设计基础(4),70,思考与练习 5+10 mod 10 9 / 3

33、 +2 2,步骤： = 5 + 10 mod 10 3 + 4 = 5 + 10 mod 3 + 4 = 5 + 1+ 4 = 10,VB程序设计基础(4),71,4. 运算符与表达式,字符串连接符：“”和“+” “”：用于强制将两个表达式作为字符串连接。 “+” ：当连接符两边的表达式都为字符串时，将两个字符串连接；如果一个是字符串而另一个是数字，则进行相加。 例如： ABCD + EFGHI 结果为：ABCDEFGHI “VB” & “程序设计教程” 结果为：VB程序设计教程,二、字符运算符与字符表达式,VB程序设计基础(4),72,例： 100 + 123 结果为 223 100 + 1

34、23 结果为 100123 “ Abc” + 123 出现“类型不匹配”的错误提示 100 & 123 结果为 100123 100 & 123 结果为 100123 Abc & 123 结果为 Abc123 Abc & 123 结果为 Abc123,注意：使用运算符“&”时，变量与运算符“&”之间应加一个空格。这是因为符号“&”还是长整型的类型定义符，如果变量与符号“&”接在一起，VB系统先把它作为类型定义符处理，因而就会出现语法错误。,VB程序设计基础(4),73,4. 运算符与表达式,关系运算符也称比较运算符，用来对两个表达式的值进行比较。关系表达式的结果是一个布尔值，即True（成立）

35、或False （不成立） 。,三、关系运算符与关系表达式,VB程序设计基础(4),74,数值的比较: 应避免对两个浮点数直接作“相等”或“不相等”的比较。例如：1.0/3.0*3.0=1.0，在计算机上执行时可能会给出假值。可以改写为：Abs(1.0/3.0*3.0-1.0)“189” ，按数值比较，结果为False。 数值型与不能转换成数值型的字符型比较，如：77 sdcd ，不能比较，系统出错。,VB程序设计基础(4),75,字符串的比较: 两个字符串的比较，从第1个字符开始，按字符的ASCII码值逐一进行比较， ASCII码值大的字符所在的字符串大。 例： ABCDE ABRA 结果为

36、False 常见的字符值的大小关系如下： “空格”“数字”“大写字母”“小写字母”“所有汉字” Like运算符用来比较字符串表达式和SQL表达式中的样式，主要用于数据库查询。Is运算符用来比较两个对象的引用变量，主要用于对象操作。,VB程序设计基础(4),76,4. 运算符与表达式,逻辑运算也称布尔运算。用逻辑运算符连接两个或多个关系式，组成一个布尔表达式。,四、逻辑运算符与逻辑表达式,VB程序设计基础(4),77,4. 运算符与表达式,如果对数值进行逻辑运算，操作数都要转换成二进制值逐位进行逻辑运算（0当False,1当True）。 例如：63 And 16 结果为16 00000000 A

37、nd00000000 关系表达式与逻辑表达式常常用在条件语句与循环语句中，作为条件控制程序的流程走向。,四、逻辑运算符与逻辑表达式,VB程序设计基础(4),78,思考与练习 例：征兵的条件是：男性(sex),年龄（age）在18-20之间，身高（size）在1.65m以上；或者女性(sex),年龄（age）在16-18之间，身高（size）在1.60m以上。 请写成VB的条件表达式。,答： 设性别sex值True代表男，sex值False代表女。 (sex=True And age=18 And age=1.65) Or (Not sex And age=16 And age=1.60),VB程序设计基础(4),79,4. 运算符与表达式,表达式的一般执行顺序： 函数运算算术运算符连接运算符关系运算符逻辑运算符 在书写表达式时，应注意以下几点： 乘号“*”不能省略，例x 乘以y 应写成：x*y 可以用括号改变优先顺序，并且括号必须成对出现； 运算符不能相邻。例a+*b是错误的。,五、表达式的执行顺序,(b-sqr(b*b-4*a*c)/(2*a),