VB程序设计语言基础课件

第3章VB程序设计语言基础4/2/20231VisualBasic程序设计教程第3章VB程序设计语言基础本章将介绍构成VB应用程序的基本元素以及使用方法，主要包括数据类型、表达式和运算符和常用函数等内容。3.1数据类型3.2常量与变量3.3表达式和运算符3.4VisualBasic的常用函数4/2/20232VisualBasic程序设计教程3.1数据类型数据不仅仅是数值，凡是能够输入到计算机中、被计算机识别并加工处理的符号的集合称之为数据。数值、文字、字符、图形、图像和声音等都是数据。数据既是计算机程序处理的对象，也是运算产生的结果。数据按其构造、处理方式、用途及基本属性，可分为若干不同的类型。4/2/20233VisualBasic程序设计教程2．字符型数据（String）用双引号括起来的一串字符。一个西文字符占1个字节，一个汉字或全角字符占2个字节。VB中字符串分两种：定长字符串和变长字符串。例如：“123”、“VisualBasic”、"北京奥运"、""（空字符串）4/2/20235VisualBasic程序设计教程3．日期型数据日期型数据表示由年、月、日组成的日期信息或由时、分、秒组成的时间信息。日期型数据占8个字节内存。日期型数据的书写格式为mm/dd/yyyy或mm-dd-yyyy，或者是其他可以辨认的文本日期。4/2/20236VisualBasic程序设计教程4．逻辑型数据逻辑型数据也称为布尔型数据，在内存中占2个字节。逻辑型数据取值只有两种：True（真）和False（假）。4/2/20237VisualBasic程序设计教程6．对象型数据对象型数据用来表示图形、OLE对象或其他对象，用4个字节存储。4/2/20239VisualBasic程序设计教程3.2常量与变量3.2.1常量3.2.2变量4/2/202310VisualBasic程序设计教程3.2.1常量常量是指在程序中事先设置、运行过程中数值保持不变的数据。VB中常量分直接常量和符号常量两种形式。4/2/202311VisualBasic程序设计教程1．直接常量-2逻辑（布尔）常量逻辑常量只有True和False两个值。将逻辑常量转换成整形数时True为-1，False为0；而数值型数据转换成逻辑常量时非零为True，零为False。日期常量日期型常量的表示方法是用两个“#”号把表示日期和时间的值括起来。4/2/202313VisualBasic程序设计教程1．直接常量-3如果需要特别指明一个常量的类型，可以在常数后面加上类型说明符，如表所示。类型符数据类型%整型&长整型!单精度浮点数#双精度浮点数@货币型＄字符串型4/2/202314VisualBasic程序设计教程2．符号常量符号常量是指用事先定义的符号（即常量名）代表具体的常量，通常用来代替数值或字符串。符号常量又分两种：系统常量和用户自定义常量。4/2/202315VisualBasic程序设计教程用户自定义常量-1VB允许用户创建自己的符号常量，称之为用户定义符号常量。用户定义符号常量使用Const语句来给常量分配名字、值和类型。声明（定义）常量的语法为：Const<常量名>［As<数据类型>］=<表达式>4/2/202317VisualBasic程序设计教程用户自定义常量-2例如：ConstPI#=3.141592653ConstMin=256Max=999，Constabc！=168.84/2/202318VisualBasic程序设计教程3.2.2变量变量是指在程序运行过程中，取值可以改变的数据。VB有两大类型变量：属性变量和内存（声明）变量。4/2/202319VisualBasic程序设计教程2．定义变量一般是先定义（声明）后使用。定义变量的目的就是为变量命名，同时由系统通过其类型为它分配存贮单元。变量也可以不加任何定义而直接使用。变量的定义分显式定义和隐式定义两种。4/2/202321VisualBasic程序设计教程显式定义所谓显式定义，是指每个变量在使用前先定义。显式定义语句的格式为：Dim<变量名1>［As<类型>］［，<变量名2>［As<类型>］Dim<变量名1>［<类型符>］［，<变量名2><类型符>］

4/2/202322VisualBasic程序设计教程隐式定义VB允许用户编程时可以不加任何定义而直接使用变量，系统运行时再临时为变量分配存储空间，通常称这种方式为隐式定义。4/2/202323VisualBasic程序设计教程3.3表达式和运算符表达式是数据之间运算关系的表达形式，由常量、变量、函数等数据和运算符组成。3.3.1算术运算符和算术表达式3.3.2字符串运算符3.3.3关系运算符和关系表达式3.3.4逻辑运算符和逻辑表达式3.3.5日期运算符3.3.6运算符的优先级4/2/202325VisualBasic程序设计教程3.3.1算术运算符和算术表达式优先级运算运算符表达式例子1幂^M^N2取负--N3乘法、浮点除法*、/M*N、M/N4整数除法\M\N5取模（余数）ModMModN6加法、减法+、-M+N、M-N4/2/202326VisualBasic程序设计教程2．整数除法与浮点除法-2例如：5/2结果为2.55\2结果为224.4\5结果为624.6\5结果为54/2/202329VisualBasic程序设计教程3．取模运算取模运算用来求第1个操作数整除第2个操作数所得的余数，其结果的正负号始终与第1个操作数的符号相同。通常用来判断一个数是否能被另一个数整除。例如：7Mod3 结果为17Mod-3 结果为1-7Mod3 结果为-1-7Mod–3 结果为-14/2/202330VisualBasic程序设计教程4．算术表达式-1算术表达式由算术运算符，数值型常量、变量、函数和括号组成，其运算结果为一数值。表达式的书写原则：表达式中的所有操作数和运算符都必须在同一水平线上。括号必须成对出现，均使用圆括号。4/2/202331VisualBasic程序设计教程4．算术表达式-2算术运算符的优先级当算术表达式中出现多个算术运算符时，按表3-3中运算符的优先级决定其运算顺序，幂运算的优先级最高，加、减运算的优先级最低。4/2/202332VisualBasic程序设计教程4．算术表达式-3算术运算中数据类型的转换在算术运算中，如果操作数具有不同的数据精度，VB规定运算结果的数据类型采用精度高的数据类型。Integer<long<Single<Double<Currency

4/2/202333VisualBasic程序设计教程3.3.2字符串运算符字符串运算符有两个“＆”和“+”，用来连接两个或更多个字符串。格式：<字符串1>＆<字符串2>[＆<字符串3>]…4/2/202334VisualBasic程序设计教程3.3.3关系运算符和关系表达式-1关系运算符也称比较运算符，用来对两个相同类型的表达式进行比较，其结果是一个逻辑值，若关系成立，结果为True（真），否则为False（假）。4/2/202335VisualBasic程序设计教程3.3.3关系运算符和关系表达式-2运算符含义实例结果=等于3+8=15False>大于"bcde">"abde"True<小于"ABCD">"abde"False>=大于等于"fg">="abc"True<=小于等于"2008">="2009"False<>或><不等于"New"<>"new"TrueLike字符窜匹配"New"like"*ew"TrueIs比较对象4/2/202336VisualBasic程序设计教程3.3.4逻辑运算符和逻辑表达式逻辑运算又称布尔运算，用逻辑运算符连接两个或多个关系表达式，构成逻辑表达式。其运算结果为逻辑型数据，即True（真）或False（假）。4/2/202337VisualBasic程序设计教程非（Not）运算进行取反运算。例如：a=2：b=6Not(a>b)结果为TrueNot–1结果为0Not0结果为–14/2/202338VisualBasic程序设计教程与（And)运算两个表达式均为True，结果才为True，否则为False。例如：a=2：b=6(a<b)And(7>3)结果为True4/2/202339VisualBasic程序设计教程或（Or）运算两个表达式只要有一个为True，结果为True，只有当两个都为False，结果才是False。例如：a=2：b=6(a<b)Or(4>7)结果为True4/2/202340VisualBasic程序设计教程异或（Xor）运算两个表达式同时为True或同时为False，结果为False，否则为True。例如：(2<7)Xor(3>5)结果为True4/2/202341VisualBasic程序设计教程等价（Eqv）运算两个表达式同时为True或同时为False，结果为True，否则为False。例如：(2<7)Eqv(3>5)结果为False4/2/202342VisualBasic程序设计教程蕴含（Imp）运算当第1个表达式为True，第2个表达式为False时，结果为False。例如：(2<7)Imp(3>5)结果为False4/2/202343VisualBasic程序设计教程3.3.5日期运算符日期型数据只有加（+）和减（-）两个运算符。两个日期型数据相减，结果是一个整型数据，即两个日期相差的天数。日期型数据加上（或减去）一个整型数据，结果仍为一日期型数据。4/2/202344VisualBasic程序设计教程3.3.6运算符的优先级各运算符的优先级为：①数值运算符；②字符串运算符；③关系运算符；④逻辑运算符。如果表达式中有函数和括号，则先做函数和括号内的表达式。4/2/202345VisualBasic程序设计教程3.4VisualBasic的常用函数3.4.1算术函数3.4.2字符串函数3.4.3数据类型转换函数3.4.4日期和时间函数3.4.5测试函数3.4.6格式函数Format4/2/202346VisualBasic程序设计教程3.4.1算术函数函数格式功能Sin(X)返回X的正弦值Cos(X)返回X的余弦值Abs(X)返回X的绝对值Sgn(X)返回X的符号X<0返回-1，X=0返回0，X>0返回1Sqr(X)返回X的平方根(X>=0)Exp(X)返回e的X次方Rnd(X)产生[0,1)之间的随机数4/2/202347VisualBasic程序设计教程1．随机函数-1随机函数Rnd(x)，产生一个[0,1)之间的Single型的随机数。格式为：Rnd[(expN)4/2/202348VisualBasic程序设计教程1．随机函数-2产生指定区间的随机数的方法为：[0,x)区间的随机浮点数：Rnd*x[m,n)区间的随机浮点数：m+Rnd*(n–m)[i,j]区间的随机整数：Int(i+Rnd*(j–i+1))4/2/202349VisualBasic程序设计教程2．随机数语句当一个应用程序不断地重复使用随机函数Rnd，VB可能会提供相同的种子，即同一序列的随机数可能会反复出现，用随机数语句可以消除这种情况。随机数语句的格式为：Randomize[expN]4/2/202350VisualBasic程序设计教程3.4.2字符串函数函数格式功能Ltrim(字符串)删除“字符串”左边的空白字符Rtrim(字符串)删除“字符串”右边的空白字符Trim(字符串)删除“字符串”左右两边的空白字符Len(字符串|变量名)返回字符串的长度Left(字符串，n)返回“字符串”的前n个字符Mid(字符串，m，n)从第m个字符开始，向后截取n个字符Right(字符串，n)返回“字符串”的最后n个字符String(n,|ASCII码)返回由“字符串”中首字符或“ASCII码”组成的n个相同的字符串Ucase(字符串)把“字符串”中的小写字母转换为大写字母Lcase(字符串)把“字符串”中的大写字母转换为小写字母Space(n)返回由n个空格组成的字符串InStr([m,]c1,c2[,n])在c1中从第m个字符开始找c2，省略m时从头开始找，返回第一次找到c2的开始位置，找不到为0。4/2/202351VisualBasic程序设计教程1．删除空白字符函数格式1：Ltrim(字符串)格式2：Rtrim(字符串)格式3：Trim(字符串)4/2/202352VisualBasic程序设计教程2．字符串长度测试函数格式：Len(字符串|变量名)例如：s1="计算机"一个英文字符或一个汉字都看做是一个字符，均占用2个字节的存储空间。4/2/202353VisualBasic程序设计教程3．字符串截取函数-1格式1：Left(字符串，n)格式2：Mid(字符串，m，n)格式3：Right(字符串，n)4/2/202354VisualBasic程序设计教程3．字符串截取函数-2例如：v="GoodLuck"v1=Left(v,4)v2=Right(v,4)v3=Mid(v,1,4)4/2/202355VisualBasic程序设计教程4．返回指定字符串函数格式：String(n，字符串|ASCII码)例如：a=string(3,65)b=string(3,"#")4/2/202356VisualBasic程序设计教程5．大小写字母转换函数格式1：Ucase(字符串)格式2：Lcase(字符串)4/2/202357VisualBasic程序设计教程6．空格函数格式：Space(n)其中：例如：u="BBC"+Space(2)+"CDD"4/2/202358VisualBasic程序设计教程7．字符串匹配函数格式：InStr([m,]c1,c2[,n])例如：?InStr(2,"asd","a",0)4/2/202359VisualBasic程序设计教程3.4.3数据类型转换函数函数格式功能实例结果Asc(String)返回字符串中第一个字符的ASCII码Asc("a")97Chr(X)将ASCII码转换成字符Chr(65)AInt(X)返回不大于自然数X的最大整数Int(-34.5)-35Cint(X)将X取整，小数部分舍入处理Cint(-34.51)-35Fix(X)将X取整Fix(-34.5)-34Str(X)将X的值换成字符串Str("-23.5")-23.5Val(String)将字符串换成数值Val("45EF")454/2/202360VisualBasic程序设计教程3.4.4日期和时间函数函数格式功能Date()返回计算机系统当前日期(年-月-日)Day(Now)返回当前月中的日(1~31)WeekDay(Now)返回当前星期(1~7)Month(Now)返回当前月份(1~12)Year(Now)返回当前年份(YYYY)Hour(Now)返回当前小时Minute(Now)返回当前分钟Second(Now)返回当前秒Now()返回系统日期和时间Time()返回系统时间4/2/202361VisualBasic程序设计教程例3-1（界面）【例3-1】在窗体Form1上有文本框Text1、Text2、Text3、Text4、Text5和Text6，要求单击窗体时，在6个文本框Text1中分别显示当前系统的年、月、日、时、分和秒。如图所示。4/2/202362VisualBasic程序设计教程例3-1（语句）代码如下：PrivateSubForm_Click()Text1.Text=Year(Now)Text2.Text=Month(Now)Text3.Text=Day(Now)Text4.Text=Hour(Now)Text5.Text=Minute(Now)Text6.Text=Second(Now)EndSub4/2/202363VisualBasic程序设计教程3.4.5测试函数函数格式功能返回值的类型IIf(E,z1,z2)若表达式E为True，返回表达式z1的值，否则返回表达式z2的值由z1、z2的值决定IsNull(E)测试表达式是否不包含任何有效数据(Null)BooleanIsNumeric(E)测试表达式的值是否为数值型BooleanIsArray(V)测试变量是否为数组BooleanVarType(E)返回表达式的值类型对应的整数Integer4/2/202364VisualBasic程序设计教程3.4.6格式函数Format格式函数Format可以将要输出数据以某种特定的格式输出，其返回值是字符串。Format函数的格式为：Format(表达式[，格式字符串])4/2/202365VisualBasic程序设计教程1.数值格式化格式字符作用实例结果0按指定的位数显示数字，不足处可前后补零format(23,"000.0")023.0#数字前后不补零format(123,"##.#")123.%数字乘以100同时在右边加上百分号format(0.5,"0%")50%$在数字前