目 录 基础篇
第一部分 常量、变量、表达式 .............................................................. 1 第二部分 控件和窗体设置 ...................................................................... 4 第三部分 顺序结构程序设计 ................................................................ 13 第四部分 选择结构程序设计 ................................................................ 16 第五部分 循环结构程序设计 ................................................................ 21 第六部分 数组 ........................................................................................ 32 第七部分 过程 ........................................................................................ 45 第八部分 文件 ........................................................................................ 61
提高篇
第一部分 常量、变量、表达式 .......................................................... 64 第二部分 控件和窗体设置 .................................................................. 65 第三部分 顺序结构程序设计 .............................................................. 75 第四部分 选择结构程序设计 .............................................................. 75 第五部分 循环结构程序设计 .............................................................. 78 第六部分 数组 ...................................................................................... 83 第七部分 过程和自定义函数 .............................................................. 87 第八部分 文 件 .............................................................................. 96
基础篇
第一部分 常量、变量、表达式
一、选择题
1.下面合法的常量是（ ）。
A.1/2 B.abcd C.1.2*5 D.False 2.下列（ ）是正确的VB常量。
A.D-6 B.E-6 C.5D D.5E-6
3.Integer类型的变量可存放的最大整数为( ) A. 255 B. 256 C. 32768 D.32767
4.下列( )是合法的变量名 A. abs B.-al C. “cdc” D.abe_10
5.下面表达式中，( )的值是整型（Integer或Long）。
A.36+4/2 B. 123+Fix(6.61) C. 57+5.5\\2.5 D. 356 & 21 6.表达式16/4-2^5*8/4 MOD 5\\2 的值为( )。 A.14 B.4 C.20 D.2 7.下列哪一个是日期型常量( )。 A.“2/1/99” B.2/1/99 C.#2/1/99# D.{2/1/99}
8. 计算表达式Cint(-3.5)*Fix(-3.81)+Int(-4.1)*(5 mod 3)，其值是（ ）。 A.2 B.1 C.-1 D.6
9.在下列4个表达式中，非法的表达式形式是（ ）。 A．A+B=C B．0=1 C．“ABC”+112 D．1/2=0.5
10.下列表达式中，能够正确计算的表达式有（ ）个。
①4096*2 ②Cint(5.6)*5461 ③6553*5+0.5*6 ④32768+12 A. 4 B. 3 C. 2 D. 1 11.表示“X>Y≥Z”，正确的VB逻辑表达式是（ ）。 A. X>Y and Y>=Z B. X>Y=>Z C. X>Y or Y≥Z D. X>Y and ≥z
12.表达式23/5.8、23\\5.8、23 mod 5.8的运算结果分别是（ ）。 A.3、3.9655、3 B.3.9655、3、5 C.4、4、5 D.3.9655、4、3 13．已知X
A. Sgn(X-Y)+sgn(A-B)=-1 B. Sgn(X-Y)+sgn(A-B)=-2 C. Sgn(X-Y)+sgn(A-B)=2 D. Sgn(X-Y)+sgn(A-B)=0 14．下列各表达式能产生[1,3]随机整数的是（ ）。 A.Rnd()*3+1 B.Int(Rnd()*2)+1 C.Fix(Rnd()*3+1) D.Int(Rnd()*3)+1
15．圆心在原点上的两个同心圆，半径分别为2和4。描述点（x,y）在小圆外但在大圆内（包括在两个圆周上）的表达式为（ ）。
A． Abs(x) <=4.0 And Abs(y) >=2.0 B．2.0 <= Sqr(x*x+y*y) <=4.0 C． x*x+y*y <=16.0 And x*x+y*y >=4.0 D．(x Or y)>=2.0 And (x Or y) <=4.0
1
16．下列7个表达式中，表达式的值不是数值5或5.0的是（ ）。 ① Sqr(25)； ② 25 ^ 0.5； ③ 55 Mod 10； ④ 5.5 \\ 1.2； ⑤ 5 * 3 / 15 * 5； ⑥ Abs(5 - 10)； ⑦ (3 * 3 + 4 * 4) ^ (1 / 2)。 A．④ B．②⑥ C．①⑤⑦ D．③
x?e317．数学表达式sin27?对应的VB算术表达式为（ ）。
|x?y|?
A.sin(27)+sqr(x+exp3)/(x+y)
B.sin(27*3.14159/180)+ sqr(x+exp(3))/abs(x+y) C. sin(27*3.14159/180) +sqr(x+e^3)/ abs (x+y) D. sin(27*pi/180)+ sqr(x+exp(3))/abs(x+y)
18.下列的关系表达式中,运算结果为True的是（ ）。 A.CInt（1.5）=Int（1.5） B.Fix（1.5）=Int（1.5） C.Fix(-1.5）=CInt(-1.5） D.Fix(-1.5）=Int(-1.5）
19．函数Cint、Int、Fix都返回整数值，以下能正确地描述它的返回值大小关系的是（ ）。 A. Cint(-4.51)=Int(-4.51) 20．下列函数中，返回值是字符串的有（ ）。 A Chr B InStr C Val D Asc 21．下列函数中，返回值不是字符串的是（ ）。 A Trim B Left C Rnd D Hex 22．下面表达式的值是False的有（ ）。 A． \ B． InStr(\C． Str(2000)< \ D． UCase(\23．设s1和s2都是字符串型变量，s1=\，则下列表达式中结果为True的是（ ）。 A．Mid(s1,8,1)> s2 B． Len(s1)<>2*Instr(s1, \ C． Chr(66) & Right(s1,4) = \ D． Instr(Left(s1,6), \ 24．下列表达式中，运算结果与函数mid(s, i, i)的返回值相同的是（ ）。 A. left(s,i) & right(s,len(s)-i) B.left(right(s,len(s)-i+1),i) C. left(right(s,i),len(s)-i+1) D.left(s,len(s)-i) & right(s,i) 25．可以把变长字符串S中的第一个“ABC”子串，替换成“1234”的语句是（ ）。 A.s=left(s,instr(s,“ABC”)) & “1234”& right(s,len(s)-instr(s,“ABC”)-2) B.mid(s,instr(s,“ABC”),3)=“1234” C. mid(s,instr(s,“ABC”),4)=“1234” D. s=left(s,instr(s,“ABC”)-1) & “1234”& right(s,len(s)-instr(s,“ABC”)-2) 26．下列选项中，所包含的所有表达式能够将两位整数x的个位数与十位数对调（如将78转换为87）的是（ ）。 ①val(right(x,1) & left(x,1)) ②val(right(str(x),1)) & left (str(x),1)) ③ val(right(Cstr(x),1)) & left (Cstr(x),1)) ④val(mid(x,2,1)+ mid(x,1,1)) A. ①② B. ②③ C. ②④ D. ①③④ 2 27.设 a=5，b=4，c=3，d=2，下列表达式的值是（ ）。 3>2*b Or a=c And b<>c Or c>d A）1 B）True C）False D）2 28.设 a=\，则下列使变量 b 的值为“VisualBasic”的语句是（ ）。 A）b=Left(a,10) B）b=Mid(a,10) C）b=Right(a,10) D）b=Mid(a,11,10) 29.设 a=2，b=3，c=4，d=5，下列表达式的值是（ ）。 Not a<=c Or 4*c=b^2 And b<>a+c A）-1 B）1 C）True D）False 30.设 a=5，b=10，则执行 c=Int((b-a)*Rnd+a)+1 后，c 值的范围为（ ）。 A）5～10 B）6～9 C）6～10 D）5～9 31.有下列语句： Dim a,b As Integer c=\d=#7/20/2005# 下列关于这段代码的叙述中错误的是（ ）。 A）a 被定义为 Integer 类型变量 B）b 被定义为 Integer 类型变量 C）c 中的数据是字符串 D）d 中的数据是日期类型 32.下列能从字符串\中直接取出子字符串\的函数是（ ）。 A）Left B）Mid C）String D）Instr 33.设 a=4，b=3，c=2，d=1，下列表达式的值是（ ）。 a>b+1 Or c A）True B）1 C）-1 D）0 34.下列可以作为 Visual Basic 变量名的是（ ）。 A）A#A B）counstA C）3A D）?AA 35.设 x=4，y=6，则下列不能在窗体上显示出“A=10”的语句是（ ）。 A）Print A=x+y B）Print\C）Print\）Print\36.设 a=2，b=3，c=4，下列表达式的值是（ ）。 Not a<=c Or 4*c=b^2 And b<>a+c A）-1 B）1 C）True D）False 37.有下列用户定义类型： Type Student number As String name As String age As Integer End Type 则下列正确引用该类型成员的代码是（ ）。 A）Student.name=\李明\）Dim s As Student s.name=\李明\ C）Dim s As Type Student D）Dim s As Type s.name=\李明\李明\ 38.设 a=5，b=6，c=7，d=8，执行下列语句后，x 的值为（ ）。 x=IIF((a>b) And (c>d),10,20) A）10 B）20 C）True D）False 39.执行下列程序段后，变量 c$的值为（ ）。 a$=\ 3 b$=\ c$=b$ & UCase(Mid$(a$,7,6))& Right$(a$,12) A）Visual BASIC Programming B）Quick Basic Programming C）QUICK Basic Programming D）Quick BASIC Programming 二、填空题 1.设A=2，B=3，表达式A>B的值是 。 2.在VB中声明符号常量的关键字是 。 3.表达式 6.5*5 mod 28\\8 的值是 。 4．把逻辑值True赋给整型变量之后，此变量的值会变为 。 5．默认情况下，所有未经显式定义的变量均被视为 类型。 6.设a=3,b=2,c=1,运行print a>b>c的结果是 。 7.表达式“12345”<>“12345”&“ABC”的值是 。 8.声明定长为10个字符变量sstr的语句为 。 9.求x与y之积除以Z 的余数的VB表达式为 。 10.设single型变量xyz 的值为123.45，若要将其转换成字符串，应使用的类型转换函数是 。 11.若要在字符串asdgewl中取dge，则使用函数 实现。 12.下列语句的输出结果 。 Print Int(12345.6789*100+0.5)/100 13．下列语句的输出结果是 。 Print Format(Int(12345.6789*100+0.5)/100,\ 14．描述“X 是小于 100 的非负整数”的 Visual Basic 表达式是 。 第二部分 控件和窗体设置 一、选择题 1.如果在窗体上有命令按钮OK，在代编辑窗口有与之对应的Cmdok_Click()事件，则命令按钮控件的名称属件和Caption属性分别为 ( )。 A.Ok、Cmd B.Cmd、Ok C.Cmdok、Ok D.Ok、Cmdok 2.窗体Form1的名称属性是frm，它的Load事件过程名是 ( )。 A.Form_Load B.Form1_Load C.frm_Load D.Me_Load 3. Visual Basic程序设计时常用的Print、Cls属于 ( )。 4