第3单元 Visual Basic语言基础
本单元重点：
1、数据类型
Visual Basic提供两种数据类型：基本数据类型和用户自定义的数据类型。 ⑴基本数据类型
Visual Basic提供的基本数据类型主要有字符串型、数值型、逻辑型和日期型。它们有各自的操作方式和取值范围。
⑵用户定义的数据类型
用户可以利用Type语句定义自己的数据类型，其格式如下： Type 数据类型名
数据类型元素名1 As 类型名 数据类型元素名2 As 类型名 ?? End Type
其中，“数据类型名”是要自定义的数据类型的名字，“数据类型元素名”不能是数组名，“类型名”可是任何基本数据类型，也可以是用户定义的类型。
2、常量和变量
Visual Basic中，数据有常量和变量两种形式。常量的值在程序执行期间不发生变化；变量代表内存中指定的存储单元，可以根据需要赋予不同的规定类型的数据。
变量：在Visual Basic中执行应用程序期间，用变量来临时存储数值。变量有名字（用来引用变量所包含的值）、数据类型（确定变量能够存储数据的种类）和作用域（确定变量所在的代码范围）。
变量的声明：变量类型包括基本数据类型和用户定义类型。在Visual Basic中，可以显式或隐式地声明变量及其类型。
变体类型变量：在声明语句中，使用类型关键字Visual Basic定义类型，或仅定义变量而不作类型声明（默认类型说明为As 子句），或变量名不带类型符，则该变量称为变体类型变量。
常量：Visual Basic的常量分两种：一种是文字常量，一种是符号常量。
3、常用内部函数
Visual Basic的内部函数大体上可以分为5类：转换函数、数学函数、字符串函数、时间/日期函数和随机函数。这些函数都带有一个或几个自变量，在程序设计语言中称为“参数”。函数对这些参数运算，返回一个结果值。
18
4、运算符与表达式
⑴算术运算符：算术运算符用来对数值型数据进行简单的计算。
⑵关系运算符：关系运算符用来比较两个操作数的大小，由操作数和关系计算符组成的表达式称为关系表达式。关系表达式的运算结果是一个逻辑值，即真（True）或假（False）。
⑶逻辑运算符：又称布尔运算。逻辑运算符在左右操作数要求为逻辑值。
⑷表达式的运算顺序：函数运算高于算术运算，算术运算高于比较运算，比较运算高于逻辑运算。
19
第3 单元 实践练习
一、选择题
1、在Visual Basic中，为表示钱款而设置的数据类型是＿＿＿＿。 A．字节型 B．货币型 C．对象型 D．布尔型
2、可在常数的后面加上类型说明符以强制表示常数的类型，用＿＿＿＿表示整型常数。 A．% B．＃ C．！ D．$
3、Visual Basic中的数值可以用十六进制或八进制表示，十六进制数以＿＿＿＿开头，八进制数以＆O开头。
A．$O B．&O C．$H D．＆H
4、如果一个变量未经定义而直接使用，则该变量为＿＿＿＿类型的变量。 A．Variant B．String C．Currency D．Single 5、以下名项中，不是字符串常量的是：＿＿＿＿。
A．”” B．”5%成功率” C．”uiek” D．strBareFoot 6、下无符号常量的声明中，不合法的是：＿＿＿＿。 A．Const a As Single=1 B．Const a As Double=Sin(1) C．Const a=”OK” D．Const a$=”12” 7、关于变量的说法不正确的是：＿＿＿＿。 A．变量名的长度不能超过255个字符 B．变量名可以包含小数点
C．不能将Visual Basic的保留字用作变量名 D．变量名的第一个字符必须是字母
8、以下各项可以作为Visual Basic的变量名的是：＿＿＿＿。 A．Bare_Foot B．52Heel C．Silk-Leg D．High Heel
9、变量定义语句：Dim max, min As Single，则可知变量max的类型是：＿＿＿＿。 A．单精度型 B．双精度度型 C．变体类型 D．字符串型 10、根据变量的作用域，可以将变量分为3类，它们是：＿＿＿＿。 A．局部变量、模块级变量和标准变量 B．局部变量、标准级变量和全局变量 C．局部变量、模块级变量和窗体变量 D．局部变量、模块级变量和全局变量
11、Visual Basic中提供了强制用户对变量进行显式声明的措施，可以加入的语句是：＿＿。
20
A．Option Base 1 B．Option Explicit C．Option Explicit1 D．Option Base 12、P的值为-3时，-P^2的值是：＿＿＿＿。 A．6 B．-6 C．9 D．-9
13、用a，b，c表示三角形的3条边，条件“三角形任意两边之和大于第三边”的逻辑表达式可以用＿＿＿＿表示。
A．a + b > c And a + c > b And b + c > a B．a + b < c Or a + c < b Or b + c < a C．a + b > c Or a + c > b Or b + c > a D．Not (a + b < c Or a + c < b Or b + c < a) 14、一元二次方程aX2+bX+c=0有实根的条件是a≠0，且b2-4ac≥0，正确表示该条件的布尔表达式是：＿＿＿＿。
A．a <> 0 And b2-4ac>= 0 B．a <> 0 And b b – 4 a c >= 0
C．a <> 0 And b * b - 4 * a * c >= 0 D．a <> 0 And b * b - 4 * a * c ≥0 15、以下关于运算符的说法中，错误的是：＿＿＿＿。 A．括号可以改变运算符的运算顺序
B．通常不允许两个运算符相连，两个运算符应当用括号隔开 C．在表达式中只能用圆括号，不能使用方括号和花括号 D．表达式中的乘号“*”可以省略，但不能用符号“×”代替 16、以下表达式中，＿＿＿＿是Visual Basic中合法的函数。 A．Exp(y) B．SinX C．Cos[X] D．val.Text1.Text 17、表达式Left(“Mike Like Girl?s silk feet”, 3)的值是：＿＿＿＿。
A．”Mike” B．”Mik” C．” Mike Like Girl?s” D．” e Like Girl?s silk feet” 18、表达式IntStr(“阳光照耀着微风的水面，显得风和日丽”, “微风”)的值是：＿＿＿＿。 A．5 B．6 C．10 D．12
19、求一个3位正整数N的十位数的正确方法是：＿＿＿＿。 A．N-Int(N/100)*100 B．Int(N/10)-Int(N/100) C．Int(N/10)-Int(N/100)*10 D．Int(N-Int(N/100)*100) 20、表达式Abs(-9.5)+Len(“Silk”)的值是：＿＿＿。 A．9.5 B．13.5 C．9.5Silk D．-5.5 21、表达式Mid(“I Love silk foot”, 4 ,2)的值是：＿＿＿。 A．silk B．foot C．ov D．ve 22、表达式Val(“week2000”+”400”)的值是：＿＿＿。 A．2400 B．2000400 C．0 D．week2000400
21
23、表达式Val(“562Heel”+”200”) 的值是：＿＿＿。 A．562 B．762 C．200 D．562Heel200 24、表达式Val(“562Heel”)+val(”200”) 的值是：＿＿＿。 A．562 B．762 C．200 D．562Heel200 25、函数Format$(124.60,”000,000.0”)的值是：＿＿＿。
A．000，124.60 B．124.60 C．124.6 D．000，124.6 26、可以同时删除字符串前面和尾部空格的函数是：＿＿＿。 A．Trim B．Rtrim C．Mid D．Ltrim 27、有以下过程：
Private Sub Command1_Click() Dim R As Single, S As Single Const Pi = 3.1415926
R = InputBox(\请输入半径：\ S = Pi * R ^ 2 Print \圆面积＝\End Sub
下列说法不正确的是：＿＿＿。
A．在使用Const语句时，只可以放在过程的内部使用 B．Pi是一个符号常量 C．Pi在该过程内有效
D．Const语句可以放在程序的不同位置 28、有以下过程：
Private Sub Command1_Click() Static X As Integer X = X + 1 Print X; \End Sub
这是建立了一个命令按钮的单击事件过程，单击6次按钮后输出的结果是：＿＿＿。 A．1 B．5 C．6 D．不能确定的值 29、以下关于函数调用的说法中，错误的是：＿＿＿。 A．作为内部函数参数的表达式的值不受计算过程的影响 B．函数以表达式形式调用
22