单考单招计算机专业-第三单元-VB语言基础测试卷B.doc

第三单元 VB语言基础测试卷(B)
一、选择题（每题2分，共20分）
1．以下不属于Visual Basic系统的文件类型是（ ）
A） .txt B) .frm C) .cls D) .vbg
2．以下变量名中，哪个是不符合规范的（ ）
A) sum_3 B) y4$ C) filename D) 4abc
3．以下选项中，( )类型不能处理数值型数据。
A）Byte B) Currency C) Boolean D) Single
4．在VB逻辑运算符中，优先级从高到低的顺序为（ ）。
A）Not→And→Or→Xor→Eqv→Imp B) And→Not→Or→Xor→Eqv→Imp
C) And→Or→Not→Xor→Eqv→Imp D) Eqv→And→Or→Xor→Not→Imp
5．在VB中，语句Print Int(-15.3)的输出结果是（ ）
A） -15 B） -15.3 C) -16 D) 15.3
6．读下面程序段，判断变量Str2的取值是（ ）。
Dim Str1 as string ，Str2 as string
Str1=”computer”
Str2=string$(3,str1)
A) com B) ccc C) rrr D 333
7．在默认状态，若有数组声明Dim c(3,4 to 5) As Integer下面数组元素引用中正确的是（ ）
A） c(1,2) B) c(0,5) C) c(4) D) c(4,4)
8．下列（ ）组语句不能实现将变量X、Y互换。
A）x=t: t=y: y=t B) t=x: x=y: y=t
C) x=x+y: y=x-y: x=x-y D) y=y+2*x : x=y-2*x:y=(y-x)/2
9．以下程序段的运行结果是（ ）。
For i=1 to 3
For j=1 to 4
For k=3 to 6
X=x+1
Next k,j,i
Print i+j+k
A) 13 B) 14 C) 15 D) 16
10．以下程序运行后，变量X的值是（ ）。
K=6 : x=1
DO while k<=2
X=x+2
K=k-1
Loop
A) 1 B) 6 C) 3 D) 5
二、填空题（每空2分，共30分）
1．VB的模块有3种类型，分别是窗体模块、__________和_________模块。
2．输入属性或方法名称的前几个字母便可以从列表中选择该名称，按下_________键即可完成属性名称的输入。
3．代码编写中续行符是____________。
4．在VB程序中，可以使用______________函数调用外部程序或命令。
5．Msgbox函数的返回值是一个___________________。
6．在VB中，定义数组Dim A%（-5 to 5），该数组实际包含了_______个元素。
7．写出代数表达式对应的VB表达式__________________________。
8．在代码模块中加入语句____________________________的目的是变量强行声明。
9．语句For j=2 to 20 step 3 使循环体执行了________次。
10．表达式 20/4-3^2*6\2 mod 7\2 的值是___________。
11．以下程序段用来判定变量x是否素数，请补充完整。
Private sub form_click( )
Dim x as integer, I as integer, f as integer
X=inputbox(“请输入一个不少于2的整数”)
__________________________________
For i=______ to x-1
If x mod i=0 then f=0
Next i
If f=1 then print “是素数”else “不是素数”
End Sub
12．编程打印如下图形，请将程序补充完整。
Private Sub form_click( )
*
***
*****
*******
*****
***
*
Dim I as integer, J as integer
For i= -3 to 3
Print tab( );
For j=1 to ________
Print “*”；
Next j
Print
Next i
End sub
三、判断题（每题2分，共10分）
( )1、VB的注释可以加在代码行的任意位置。
( )2、#2009年平5月1日#是VB中正确的日期格式。
( )3、数组元素的引用可以不通过下标进行。
( )4、Select语句中，如果有多个Case值匹配，那么执行最后一个。
( )5、do—loop while 型循环，当条件成立时执行循环体，不成立退出循环。
四、简答题（本题共5分）
请写出VB中逻辑型、整型、双精度、日期型、字符型数据的关键字和所占字节数。

五、程序设计题（第1题8分，第2题12分，第3题15分）
1．请根据下列描述，编写财务部门征收劳务酬金所得税程序，规定如下：
（1）收入小于1000元，扣税3%
(2)收入在1000~3000元内（不含3000），800以上部分扣税15%
(3) nhtyd 3000~5000内（不含5000），3000以内按（2）的方法扣税，3000以上部分，扣税20%;
（4）当收入达到5000以上（含5000），扣税25%
程序运行界面如图所示：

2．用VB编写过程，将一张100元钞票兑换成面值为20、10、5元的钞票，要求每种至少有1张，共有多少种不同的换法？请输出所有可能的换法。

3．在t1和t2中输入随机数的范围，单击产生按钮（Cmd1）产生10个随机数放在t3中，单击排序按钮（cmd2），将这10个数按从小到在的顺序放在t4中，单击清空按钮（cmd3），清空4个文本框。

4