大学VB教学课件：第3章 VB语言基本知识

1、1第3章Visual Basic语言基本知识本章要点: VB语言编码规则 数据类型 常量、变量 运算符与表达式 常用内部函数.23.1 编码规则1在VB的代码中，字母不分大小写；2VB将关键字自动转换为大写字母开头，其余均为小写字母；3对于用户定义的变量名、过程名和函数名、VB以第一次定义为准；4在一行中可写多条语句，各语句之间用冒号隔开。如： t=a：a=b：b=t5如果一条语句在一行内写不下，可将其分为若干行，要在行后加上续行符（一个空格后跟一个下划线）。.3 Private Sub Command1-Click（） Dim s AS long，I AS integer s = 0 ：i

2、= 1 Do While i = 100 s = s + i i = i + 1 Loop Text1.Text=s EndSub开始0s1ii100s+isi+1i输出s结束例:.4 Private Sub Command1-Click（） Dim s AS long，i AS integer s = 0 ：i = 1 Do While i = 100 s = s + i i = i + 1 Loop Text1.Text=s EndSub常量: 0、1、100变量：s、i定义类型.53.2 数据类型 主要有: 数值型；字符串型；布尔型；日期型3.2.1 数值型数据 Integer(整型)

3、Long(长整型) Single(单精度浮点型) Double(双精度浮点型) Currency(货币型) Byte(字节型)1. 整数类型(1) 整型(Integer) 以2个字节存储 十进制表示: 由+ -号，09 组成 范围: -3276832767.6 八进制表示: 以&O开头，由 07组成 范围: &O0 &O177777 十六进制表示: 以&H开头，由 09,AF组成 范围: &H0 &HFFFF 例: -325 0 56 +100 &O456 &O36 &H1AC &H38 &H2(2) 长整型(Long) 以4个字节存储 十进制表示: 由+ -号，09 组成 范围: -2147

4、483648+2147483647 八进制表示: 以&O开头，以&结束 范围: &O0& &O37777777777& 十六进制表示: 以&H开头，以&结束 范围: &H0& &HFFFFFFFF&.7例: 453466 -34568 +1000000 &O456& &O36& &H1AC& &H38& &H2&2. 实数类型 浮点数采用IEEE格式, 由尾数及指数组成: . E|D (1) 单精度浮点型(Single) 以4个字节存储，可以精确到7位十进制数例: 3.234E+2 表示3.234102 -28E9 表示-28109 4.56E-17 表示4.5610-17尾数部分指数部分e|

5、d.8(2) 双精度浮点型(Double) 以8个字节存储，可以精确到16位 3.234D+2 表示3.234102 -28D9 表示-28109 4.56D-17 表示4.5610-17(3) 货币型(Currency) 以8个字节存储 用于表示定点数，其小数点左边有15位数字，右边有4位数字。3. 字节型(Byte) 用于存储二进制数据，其取值范围为0255。.93.2.2 字符串型数据(String) 由括起来的一串符号例: abc ABC 计算机 12.34 3+2 (空串) 如果字符串本身包括双引号，可用连续两个双引号表示。例: 要打印以下字符串： You must study ha

6、rd, he said. 在程序中需要将该字符串表示成: You must study hard , he said. 3.2.3 布尔型数据(Boolean) 用于进行逻辑判断，只有True和False两个值.103.2.4 日期型数据(Date) 用于表示日期和时间 格式: # VB接受许多种日期时间格式 例: 下面的 Date/Time 值全部有效。 #3-6-93 13:20# #March 27,1993 1:20am# #Apr-2-93# #14 April 1993# #12/18/1999#3.2.5 对象型数据(Object) 以4个字节存储，用于引用程序中的对象。3.2.

7、6 可变类型数据(Variant) 可以包含任何类型的数据。 可以包含 Empty、Error、及 Null等特殊值.113.3 常量 指在程序运行期间其值不发生变化的量。 两种形式: 直接常量；符号常量3.3.1 直接常量例: 欢迎使用Visual Basic 字符串常量 12345 数值型常量 True 布尔型常量 #11/10/2001# 日期型常量3.3.2 用户自定义符号常量 格式: Const As = 类型: Integer Long Single Double String String*n Boolean Date Currency Byte Variant.12例: Con

8、st Pi = 3.14159 Const Max As Integer = 9 Const BirthDate = #1/1/01# Const MyString = friend 用逗号分隔多个常量声明 Const Pi = 3.14, Max = 9, MyStr=Hello 用先前定义过的常量定义新常量 Const Pi2 = Pi * 2使用: 在程序中引用 如: AREA=Pi*R2 在程序中不可修改 如: Pi=3.14.133.3.3 系统定义符号常量 VB内部已定义，可以直接使用的常量 查看内部常量: 视图对象浏览器 选择库、类、 成员 如: 库 VBRUN 类 ColorC

9、onstants ShapeConstants 成员 Vbred vbShapeCircle 例: Private Sub Form_Activate() Const A As String = 各种常量的使用 Form1.BackColor = vbGreen Form1.ForeColor = vbRed Form1.FontSize = 14 Print A End Sub.143.4 变量 程序执行期间，用变量临时存储数值。 变量的值可以发生变化。 每个变量都有名称和数据类型。2. 变量的命名规则 第一个字符必须是字母 长度不超过255个字符 不可以包含小数点或者内嵌的类型声明字符 不

10、能使用关键字 不能与过程名或符号常量同名例: intMax strName Student1 MyName 不区分大小写；变量名应便于识别、记忆5A1. 什么是变量？ 一个有名称的内存单元称为变量。.153. 变量的声明(1) 声明变量格式:Dim|Private|Public| Static As Dim: 在窗体模块、标准模块或过程中声明变量。 Private: 在窗体模块或标准模块中声明变量，使变量仅在该模块中有效。 Public: 在标准模块中声明全局变量，使变量在整个应用程序中有效。 Static: 在过程中定义静态变量，即使该过程结束，也仍然保留变量的值。.16例: Dim Sum

11、 As Long Dim Address As String Dim No As String * 8 Private b As Integer Dim Num, Total As Integer Num为可变类型 Public Average As Single Static A As Long(2) 隐式声明 可变类型。易出错、浪费空间(3) 强制显式声明 在模块的声明段中使用语句: Option Explicit 如果设置: 工具选项编辑器要求变量声明 则在后续模块中自动插入Option Explicit.17例: 窗体模块和过程中使用 Dim语句的区别。 设在窗体中放置按钮Comman

12、d1和Command2 Dim a As Integer Private Sub Command1_Click() a = a + 10 Print a End Sub Private Sub Command2_Click() a = a + 15 Print a End Sub 运行程序，观察结果将Dim a As Integer放到过程内，再运行，观察结果。去除Dim，比较使用Option Explicit与不使用的结果。 .183.5 运算符与表达式 操作数: 常量、变量、函数、对象 运算符: 圆括号 算术运算符（算术表达式） 字符串运算符（字符串表达式） 关系运算符（关系表达式） 布尔

13、运算符（布尔表达式）3.5.1 算术运算符与算术表达式 运算符: ( ) * / (整除) Mod(求余) + - 优先级: ( ) * / Mod + - 书 写: 一条线、无 、无 .19例: 将以下表达式写成VB合法的表达式 (xy)za1+a2a-b+a(-b) a1+a2 a(-b)+a*(-b) (xy)z a(1/n) y/(-x)+x/(-y)A/(4+(8/(3+B).201. 乘方运算 例: 102 10的平方，结果为100 10(-2) 10的平方的倒数，结果为0.01 223 运算顺序从左到右，结果为64 (-8)(-1/3) 错误,当底数为负时,指数应为整数2. 整数

14、除法 例: 104 结果为2 25.686.99 先四舍五入再整除，结果为33. 取模运算 例: 10 Mod 4 结果为2 25.68 Mod 6.99 先四舍五入再求余数,结果为5 11 Mod 4 结果为3 -11 Mod 5 结果为-1 -11 Mod -3 结果为-2结果符号同第一个操作数.213.5.2 字符串运算符与字符串表达式 字符串运算符有两个: & + 例: Hello & World 结果为Hello World Check & 123 结果为Check123 123 & 456 结果为123456 123 & 456 结果为123456 123 + 456 结果为579

15、 123 + 456 结果为123456 Check + 123 错误.223.5.3 关系运算符与关系表达式1. 比较运算符 （小于） （大于） =（大于或等于） =（等于） （不等于）2. 表达式: 3. 如何比较 数值比较: 按数值大小 日期比较: 按整数yyyymmdd的值比较 单字符比较: 缺省情况下按字符的内部二进制表示比较，典型的二进制排序顺序如下： 019 ABZ abz 字符串比较：从左开始逐个比较.234. 比较结果: True False例: 45 35 结果为 False 45 = 45 结果为True 4 3 结果为True abc cdf 结果为False for

16、fortran 结果为True 例: 要判断两个单精度型变量A和B的值是否相等，可以用下式判断: Abs(A-B)1E-5.243.5.4 布尔运算符与布尔表达式1. 布尔运算符: Not And Or2. 布尔表达式: 3. 优先级: NotAndOr例: A = 10: B = 8: C = 6。 Not (A B) 结果为 False Not (B A) 结果为True A B And B C 结果为True B A And B C 结果为False A B Or B C 结果为True B A Or B C 结果为True A B Or B= C 结果为False.25例: 将以下条件

17、写成VB布尔表达式 1. m1- n1jm1+ n1 2. X 5 3. M和N之一为5，但不能同时为5 4. -100k= M1-N1) And (J = M1+N1)2. (X 5.0)3. (M = 5) And (N5) Or (M 5) And (N = 5)4. (K -100) And (K 100) And (K Mod 2 = 0 )5. (X 0) And (X-1.0)*(X-2.0) = 0.0).263.5.5 表达式的运算顺序 ( ) 函数运算算术运算关系运算布尔运算例：设a=3，b=5，c=-1，d=7，求以下表达式的值。FalseTrue False TrueT

18、rue6 True False Falsea + b c + d And a = 5 Or Not c 0 Or d 08.273.6 常用内部函数函数分类: 内部函数、用户自定义函数函数形式: 函数名( 参数可以是常量、变量或表达式。 若有多个参数，参数之间以逗号分隔。函数的使用: 函数在表达式中被调用。.283.6.1 数学函数例: Fix(45.67) 结果为45 Int(45.67) 结果为45 Fix(-2.89) 结果为-2 Int(-2.89) 结果为-3 Abs(-4) 结果为4 Log(10) 结果为2.30258509299405 Sgn(3) 结果为1 Sgn(-6) 结

19、果为-1 Sgn(0) 结果为0例: 求sin300 Sin(a * 3.14 / 180) 例: 判断一个整数Y能否被另一个整数X整除 如果 INT(Y/X)=Y/X 则整除.29例: 常用对数log10X的求法 用换底公式log10X =Ln(X)/Ln(10) 即 LOG(X)/LOG(10)例: 求e3 正确: EXP(3) 错误: e3(错)3.6.2 字符串函数例: LTrim(ABC) 结果为ABC表示空格RTrim(ABC) 结果为ABCTrim(ABC) 结果为ABCLeft(ABCDE,2) 结果为ABRight(ABCDE,2) 结果为DEMid(ABCDE,2,3) 结

20、果为BCDMid(ABCDE,2,6) 结果为BCDE.30例: Len(ABCDE) 结果为5 String(3,ABC) 结果为AAA String(3，65) 结果为AAA InStr(ABCDECDE,DE) 结果为4 InStr(5,ABCDECDE,DE) 结果为7 UCase(Abc) 结果为ABC LCase(ABc) 结果为abc.313.6.3 随机函数1. 随机函数 Rnd(x) 产生01之间的单精度随机数。 x0: 以上一个随机数作种子，产生序列中的下一个随机数 x=0: 产生与最近生成的随机数相同的数 省略x: 同x02. Randomize语句 初始化随机数发生器例: 生成a,b 范围内的随机整数 Int(b-a+1)*Rnd+a).323.6.4 转换函数例: Asc(A) 结果为65 Asc(ABC) 结果为65 Chr(65) 结果为A Str(123) 结果为123 Str(-123) 结果为-123 Val(123) 结果为123 Val(123AB) 结果为123 Val(.123AB) 结果为.1