《vb第3章Visual Basic程序设计代码基础》由会员分享，可在线阅读，更多相关《vb第3章Visual Basic程序设计代码基础（34页珍藏版）》请在金锄头文库上搜索。
1、1,第3章,Visual Basic程序设计代码基础,本章要点: 字符集 数据类型 常量、变量 运算符与表达式 常用内部函数 语句,2,3.1 字符集,1. 字符集 使用Unicode字符集，其基本字符集包括: 数字: 09 英文字母: az，AZ 特殊字符:,！ “ # $ % ? _ |,2. 关键字 关键字又称为保留字 VB自动将关键字的首字母转换为大写字母 例如: PRINT 5+6 转换成 Print 5+6,3,3.2 数据类型,主要有: 数值型；字符串型；布尔型；日期型 3.2.1 数值型数据 Integer(整型) Long(长整型) Single(单精度浮点型) Double
2、(双精度浮点型) Currency(货币型) Byte(字节型) 1. 整数类型 (1) 整型(Integer) 以2个字节存储 十进制表示: 由+ -号，09 组成 范围: -3276832767,Dim s as Integer Dim s%,4,八进制表示: 以&O开头，由 07组成 范围: &O0 &O177777 十六进制表示: 以&H开头，由 09,AF组成 范围: &H0 &HFFFF 例: -325 0 56 +100 &O456 &O36 &H1AC &H38 &H2 (2) 长整型(Long) & 以4个字节存储 十进制表示: 由+ -号，09 组成 范围: -214748
3、3648+2147483647 八进制表示: 以&O开头，以&结束 范围: &O0& &O37777777777& 十六进制表示: 以&H开头，以&结束 范围: &H0& &HFFFFFFFF&,Dim s as Long Dim s&,5,例: 453466 -34568 +1000000 &O456& &O36& &H1AC& &H38& &H2& 2. 实数类型 浮点数采用IEEE格式, 由尾数及指数组成: . E|D ,(1) 单精度浮点型(Single) ！ 以4个字节存储，可以精确到7位十进制数 (2) 双精度浮点型(Double) 以8个字节存储，可以精确到16位,6,例: 3.
4、234E+2 表示3.234102 -28E9 表示-28109 4.56E-17 表示4.5610-17 3.234D+2 表示3.234102 -28D9 表示-28109 4.56D-17 表示4.5610-17 (3) 货币型(Currency) 以8个字节存储 用于表示定点数，其小数点左边有15位数字，右边有4位数字。 3. 字节型(Byte) 用于存储二进制数据，其取值范围为0255。,7,3.2.2 字符串型数据(String) $ 由 括起来的字符序列 例: abc ABC 计算机 12.34 3+2 (空串) 如果字符串本身包括双引号，可用连续两个双引号表示。 例: 要打印以
5、下字符串： You must study hard, he said. 在程序中需要将该字符串表示成: You must study hard , he said. 3.2.3 布尔型数据(Boolean) 用于进行逻辑判断，只有True和False两个值,8,3.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)
6、 以4个字节存储，用于引用程序中的对象。 3.2.6 可变类型数据(Variant) 可以包含任何类型的数据。 可以包含 Empty、Error、及 Null等特殊值,9,3.3 常量,指在程序运行期间其值不发生变化的量。 两种形式: 直接常量；符号常量 3.3.1 直接常量 例: 欢迎使用Visual Basic 字符串常量 12345 数值型常量 True 布尔型常量 #11/10/2001# 日期型常量 3.3.2 用户自定义符号常量 格式: Const As = 类型: Integer Long Single Double String Boolean Date Currency By
7、te Variant,10,例: Const Pi = 3.1415 Const Max As Integer = 9 Const BirthDate = #1/1/01# Const MyString = friend 注意： （1） 作用域 定义位置 某个过程 该过程内部声明 模块中所有过程 模块声明段中声明 整个应用程序 标准模块声明段 Public （2）多个常量声明 用逗号分隔多个常量声明 Const Pi = 3.14, Max = 9, MyStr=Hello 用先前定义过的常量定义新常量 Const Pi2 = Pi * 2,11,（3）符号常量之间不能循环引用 Module1
8、 Public Const conAconB *2 Module2 Public Const conBconA/2 （4）符号常量不能修改，也不能赋以新值 使用: 在程序中引用 如: AREA=Pi*R2 在程序中不可修改 如: Pi=3.14,12,3.3.3 系统定义符号常量 VB内部已定义，可以直接使用的常量 查看内部常量: 视图对象浏览器 选择库、类、 成员 如: 库 VBRUN 类 ColorConstants ShapeConstants 成员 vbRed vbShapeCircle 例: Private Sub Form_Activate() Const A As String
9、= 各种常量的使用 Form1.BackColor = vbGreen Form1.ForeColor = vbRed Form1.FontSize = 14 Print A End Sub,13,3.4 变量,1. 什么是变量？ 一个有名称的内存单元称为变量。 在程序执行期间，用变量临时存储数值。 变量的值可以发生变化。 每个变量都有名称和数据类型。 2. 变量的命名规则, 第一个字符必须是字母 长度不超过255个字符 不可以包含小数点或者内嵌的类型声明字符 不能使用关键字 不能与过程名或符号常量同名 例: intMax strName Student1 MyName 不区分大小写；变量名应
10、便于识别、记忆,14,3. 变量的声明 (1) 声明变量 格式: Dim|Private|Static|Public As Dim: 在窗体模块、标准模块或过程中声明变量。 Private: 在窗体模块或过程中声明变量，使变量仅在该模块或过程中有效。 Static: 在过程中定义静态变量，即使该过程结束，也仍然保留变量的值。 Public: 在标准模块中声明全局变量，使变量在整个应用程序中有效。,15,例: Dim Sum As Long Dim Address As String Dim No As String * 8 Dim Price As Currency Dim Num, Tota
11、l As Integer Dim Average As Single,16,(2) 隐式声明 可变类型。 可以存放任何类型的数据。 例: SomeValue 100 SomeValue100 易出错、浪费空间 注意： 在应用程序中声明所有使用的变量。,17,(3) 强制显式声明 在模块的声明段中使用语句: Option Explicit 如果设置: 工具选项编辑器要求变量声明 则在后续模块中自动插入Option Explicit,18,例: 在窗体中放置按钮Command1和Command2 Dim a As Integer Private Sub Command1_Click() a = a
12、 + 10 Print a End Sub Private Sub Command2_Click() a = a + 15 Print a End Sub 运行程序，观察结果,19,4. 变量的作用域,变量的作用域: 指变量的有效范围。 将变量分为: 局部变量 模块级变量 全局变量,20,1） 局部变量 声明位置 过程中不声明/用Dim声明/用Static声明的变量 Dim A As Integer A每次执行过程时被初始化 Static C As Single C在应用程序执行期间保持不变 作用范围 仅在声明的过程中起作用 其他过程中即使有同名变量，也不是指同一变量。,21,例: Sub S
13、() X = 1 Y = 2 Z = X + Y Print X, Y, Z End Sub Private Sub C1_Click() X = 2 Y = 3 Z = X + Y Call S Print X, Y, Z End Sub,单击C1后运行结果: 1 2 3 2 3 5,22,例: Sub S() Static Z As Integer Z = Z + 2 Print Z End Sub Private Sub Command1_Click() Dim Z As Integer Z = Z + 2 Call S Print Z End Sub,第一次单击C1结果: 2 2,第二
14、次单击C1结果: 4 2,第三次单击C1结果: 6 2,23,2） 模块级变量 声明 在模块的通用声明段中用以下方法声明的变量。 Private 在模块运行时被初始化 Dim 在模块运行时被初始化 作用范围 在该模块的所有过程中都起作用 其他模块不能访问这些变量,24,例: Dim Z As Integer Sub S() Z = Z + 2 Print Z End Sub Private Sub C1_Click() Z = Z + 2 Call S Print Z End Sub,第一次单击C1结果: 4 4,第二次单击C1结果: 8 8,第三次单击C1结果: 12 12,25,例: Dim Z As Integer Sub S() Dim Z Z = Z + 2 Print Z End Sub Private Sub C1_Click() Z = Z + 2 Call S Print Z End Sub,第一次单击C1结果: 2 2,第二次单击C1结果: 2 4,第三次单击C1结果: 2 6,26,3）全局变量 声明 在模块的通用声明段中用以下方法声明的变量 Public 应用程序运行时被初始化 作用范围: 应用程序的所有过程,
