VisualBasic程序设计第三章.ppt

Visual Basic程序设计,Visual Basic语言基础,3.1 编 码 基 础,1.VB代码不区分字母的大小写 系统保留字自动转换每个单词的首字母大写；用户自定义行以第一次为准。2.语句书写 一行可书写几句语句,之间用冒号分隔；一句语句可分若干行书写，用续行符 _连接一行=255个字符。3.注释有利于程序的维护和调试 Rem开始 或 单撇号 4.保留行号与标号,3.2 数 据 类 型,标准数据类型,详见课本 P43 表3-1在程序中合理选用数据类型非常重要！尽量使用整型数对于需要较高精确度的小数运算，可使用双精度数据类型货币类型计算精度更高,3.2 数 据 类 型,3.3 变量与常量,一、变量和常量的命名规则 变量：在程序运行中其存储的值可以改变。常量：在程序运行中其值不可以改变。命名规则：1.以字母或汉字开头，后可跟汉字、字母、数字或下划线组成，长度小于等于255个字符；2.不要使用VB中的关键字；3.VB中不区分变量名的大小写；4.为了增加程序的可读性，可在变量名前加一个缩写的前缀来表明该变量的数据类型。,二、变量声明1.用Dim语句显式声明变量 形式：Dim 变量名 AS 类型 Dim 变量名类型符 例 Dim iCount As integer,sAllsum As single 等价于 Dim iCount%,sAllsum!2.隐式声明 未进行上述的声明而直接使用，其类型为 Variant 类型。建议不使用。注意:在通用声明处加 Option Explicit 语句可强制显式声明 变量。,变量作用域与变量说明语句三个作用域等级（1）局部（2）窗体/模块（3）全局（共有）,变量作用域与变量说明语句四种说明语句Dim可用于各种场合，最常用Public用于说明全局变量Private用于说明窗体/模块级全局变量Static用于说明静态变量 Public语句用于说明全局变量，Private语句用于说明窗体/模块级变量，Static用于说明静态变量，而Dim语句则可用于各种场合，是最常用的。,将字符串说明为具有固定长度：Dim As String*size例如：Dim Empname As String*50不足部分用空格填满超出部分截去,三、常量1.用户声明常量 形式：Const 常量名 AS 类型=表达式 省略 AS 类型，常量的类型由表达式值的类型决定。为使与变量名区分，一般常量名使用大写字母。例 Const MAX=1002.系统提供的常量 系统定义常量位于对象库中，可通过“对象浏览器”查看。例：vbNormal vbMinimized、vbCrLf等,数值常量1、不带小数点的数“整数”整数 和 长整数2、带小数点的数“实型数”“浮点数”单精度 和 双精度例如：123-22732742（整数）1758624-3765410（长整数）123.4-752.678 0.000352 1234E-5(单精度数）3.1415926535-8.573264907 D-15(双精度数)注意：八进制和十六进制的表示方法（&O、&H）,字符常量把一串字符用“”括起来，就构成一个字符常量。字符常量可容纳最多65535个字符数例如：“Visual Basic”“How are you!”“I”“am a student”,逻辑型常量又称布尔型常量只有两个取值：True（真）和 False（假）注意:True 和“True”有什么不同？,日期常量一般表示形式：mm/dd/yyyy为避免与字符型常量相混淆，日期常量要用“”括起来。练习：课本 P53 第5题,符号常量常量在程序中可以用符号表示。以符号形式表示的常量称为“符号常量”。代表常量的符号称作“常量名”。常量名是一个长度不超过255个字符，只能由字母、数字和下划线组成且首字符必须是字母的字符串。用Const语句自定义符号常量Public|PrivateConst常量名As Type=数值,3.4 运算符和表达式,一、运算符 1.算术运算符 例：5+10 mod 10 9/3+2 2 结果：10,2.字符串运算符、+字符串连接 123+456 结果 123456 123&456 结果 123456 区别：+两边必须是字符串，&不一定 例如：abcdef&12345 结果为 abcdef12345 abcdef+12345 出错 123&456 结果为 123456“123”+456 结果为 579注意：123+True 结果为 122 True转换为数值-1，False转换为数值0,3关系运算符 将两个操作数进行大小比较，结果为逻辑量。字符串比较,则按字符的ASCII码值从左到右一一比较，直到出现不同的字符为止.。例：ABCDE ABRA 结果为 False,4.逻辑运算符 将操作数进行逻辑运算，结果是逻辑值：条件表达式1 And 条件表达式2 条件表达式均为T，结果为T；条件表达式1 Or 条件表达式2 条件表达式有一个为T 结果为T。,二、表达式 1.组成 变量、常量、函数、运算符和圆括号。2.书写规则(1)运算符不能相邻。例a+-b是错误的。(2)乘号不能省略。例x 乘以y 应写成：x*y。(3)括号必须成对出现，均使用圆括号。(4)表达式从左到右在同一基准上书写，无高低、大小。3.不同数据类型的转换 运算结果的数据类型向精度高的数据类型靠。Integer字符运算符关系运算符逻辑运算,表达式书写举例,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岁的女性，学历专科或本科，年龄40，性别=“女”，(学历=“专科”，学历=“本科”)And And Or,比a小，比b大 用 Or,a小数,b大数,a小数,b大数,比a大，比b小 用 And,例：表示算术表达式：正确的VB表达式：3=x And x=7 错误的VB表达式：3=x=7 或 3=x Or x=7,考虑：若分别写成：年龄40 And 性别=女 And(学历=专科 And 学历=本科)年龄40 Or 性别=女 Or(学历=专科 Or 学历=本科),3.5 常用内部函数1.数学函数 Rnd函数返回0和1（包括0但不包括1）之间的双精度随机数。每次运行时，要产生不同序列的随机数，执行Randomize 语句。例产生1100的随机数：Int(Rnd*100)+12.转换函数 Chr(66)B Asc(B)66 Asc(Chr(99)99 Chr(Asc(K)K Ucase$(abcdefg)ABCDEFG3.日期函数,Time返回系统时间、Date返回系统日期、Now返回系统日期和时间 DateAdd（要增减日期形式，增减量，要增减的日期变量）DateDiff（要间隔日期形式，日期1，日期2）例如求离你毕业还有多少天：DateDiff（d,date,#2006/07/01#）假定2006年毕业,4.字符串编码和函数(1)字符串编码 Windows系统对字符采用了DBCS编码，中文2字节，西文1字节 VB中字符Unicode编码，任何字符2字节。Len(“中国good”)为6；LenB(“中国good”)为12。StrConv()进行DBCS与Unicode之间转换。(2)字符串函数 Left(“ABCDEFG”,5)“ABCDE”Right(“ABCDEFG”,5)“CDEFG”Space(3)“”得到三个空格 Mid$(ABCDEFG,2,3)BCD InStr(2,ABCDEFG,EF)5,5.格式输出函数例3.1 利用Format函数显示有关的日期和时间。Private Sub Form_Click()FontSize=12 MyTime=#9:21:30 PM#MyDate=#7/21/1997#Print Tab(2);Format(MyDate,m/d/yy)Print Tab(2);Format(MyDate,mmmm-yy)Print Tab(2);Format(MyTime,h-m-s AM/PM)Print Tab(2);Format(MyTime,hh:mm:ss A/P)Print Tab(2);Format(Date,dddd,mmmm,dd,yyyy)Print Tab(2);Format(Now,yyyy年m月dd日 hh：mm)Print FormatDateTime(Now)VB6.0新提供的函数End Sub,练习题,1、下面_是合法的变量名。A、x_yz B、123abcC、integer D、x-y2、表达式16/4-25*8/4 mod 52的值是_A、14 B、4C、20 D、2,3、与数学表达式 对应，VB的不正确表达式是_A、a*b/(3*c*d)B、a/3*b/c/dC、a*b/3/c/d D、a*b/3*c*d4、Rnd函数不可能为下列_值A、0 B、1C、0.1234 D、0.0005,5、已知A$=“12345678”,则表达式Val(Left$(A$,4)+mid$(A$,4,2)的值为_A、123456 B、123445C、8 D、66、赋值语句：a=123+mid(“123456”,3,2)执行后，a变量中的值是_A、”12334”B、123C、12334 D、157,7、在VB中，1234、123456&、1.2346E+5、1.2346D+5四个常数分别表示_、_、_、_类型8、已知a=3.5,b=5.0,c=2.5,d=True,则表达式：a=0 and a+cb+3 or not d的值是_9、整型变量x中存放了一个两位数，要将两位数交换位置，例如，13变成31，实现的表达式是_,10、表达式Ucase(Mid(“abcdefgh”,3,4)的值是_11、表示s字符变量是字母字符（大小写字母不区分）的逻辑表达式为_,12、分析语句Private Sub Form_Click()Dim x As String*5 x=abc y%=1 Print x&y x=abcdefg Print x&yEnd Sub 则单击窗体，显示结果的第一行为_,第二行为_,课堂练习 二级考试部分全真试题,正确表示命题“A是一个带小数的正数，且B是一个带小数的负数”的逻辑表达式是_(03春)写出算术表达式为（12*X+5*YSQR（ABS(D3M2)）EXP()/SIN(X)的数学算式_(02春)用关系运算符比较Cint(3.8)、Fix(3.8)、Int(3.8)、3.8的大小关系_表示“XYZ”，正确的VB逻辑表达式是_(02春)A、XY And YZ B、XYZC、XY or YZ D、XY And Z,执行语句代码 print format(2004.218,”#,#0.00”)，以下答案中哪一个是正确的A、2004.21 B、2,004.21 C、2,004.22 D、02,004.21,