vb考生试卷
- 格式：doc
- 大小：53.50 KB
- 文档页数：3
第 1 页 共 3 页
制卷日期： 200 年 月 日
1. 变量未赋值时，数值型变量的值为( )
A. 0 B. 空串 C. Null D. 没任何值 2. 表达式5^2 Mod 25\2^2的值是（ ）。 A. 1 B. 0 C. 6 D. 4 3. 表达式Right("how are you", 3)的值为( )。 A. how B. are C. you D. how are you 4. 表达式Fix（-17.8）+Sgn（-17.8）的值是（ ）。 A. 18 B. -17 C. -18 D. -19 5. 函数Len(Str(Val(“123.4”)))的值为( )。 A. 11 B. 5 C. 6 D. 8 6. 在窗体模块的通用声明段中声明变量时，不能使用（ ）关键字。 A. Dim B. Public C. Private D. Static 7. 删除字符串前导和尾随空格的函数是（ ）。 A. LTrim B. RTrim C. Trim D. LCase 8. 窗体中添加一个命令按钮，编写如下程序,程序执行结果是（ ）。 private sub command1_click( ) a=”ABCD” : b=”efgh” c=LCASE(a) : d=UCASE(B) print c;d end sub
A. abcdEFGH
B. abcdefgh
C. ABCEefgh
D. ABCDEFGH
9. 在窗体中添加一个文本框，然后编写如下两
个事件过程，程序运行后，单击窗体在文本框中
显示的内容是（ ） 。
Private Sub Form_click( )
Text1.text="VB " & "program"
End sub
Private sub text1_change( )
Text1.text=" 程序设计"
End sub
A. "VB " & "program"
B. VBprogram
C. 程序设计
D. 程序设计VBprogram
10. 下列程序段的执行结果为（ ）。
X=2
Print X+1;X+1
A. 3 3
B. X+1 X+1
C. 3 4
D. 2+1 2+1
11. 下面程序段的功能是（ ）。
A=10.5 : B=Int(A+0.5) : Debug.Print B
A. 求平均值
B. 将一实数四舍五入
C. 求绝对值
D. 舍去一实数的小数部分
12. 在窗体Form1上有两个文本框Text1和Text2,
一个命令按钮Command1，有如下事件过程。当
程序运行时，在文本框Text1 中输入123,文本框
Text2中输入321,单击命令按钮，则输出结果为
( ) 。
Private Sub Command1_Click()
Print Val(Text1.Text+Text2.Text)
End Sub
A. 444
B. 321123
C. 123321
第 2 页 共 3 页
制卷日期： 200 年 月 日
D. 132231
13. MsgBox函数的返回值的类型为( )。 A. 数值型 B. 可变数据类型 C. 字符串型 D. 日期型 14. 执行下面的语句后，所生成的信息框的标题是（ ）。 MsgBox “你好”，vbDefaultButton1，“编程” A. 你好 B. 编程 C. vbDefaultButton1 D. 系统报错 15. 在一个语句行内写多条语句，语句之间应该用( )分隔。 A. 逗号 B. 分号 C. 顿号 D. 冒号 16. VB语句中，语句定义符REM定义的是（ ） A. 恢复语句 B. 重新编行号 C. 语句改名 D. 注释语句 17. 以下语句的输出结果是（ ）。 Print format(32548.457,"000,000.00") A. 32548.457 B. 032,548.46 C. 32,548.46 D. 032,548.457 18. A=InputBox("请输入一实数"，"应用实例"，"1")语句的提示信息为( )。 A. 请输入一实数 B. 应用实例 C. 1 D. 请输入一实数，应用实例 19. 为了防止用户随意将光标置于控件上，应（ ）。 A. 将控件的TabIndex属性设置为0 B. 将控件的TabStop属性设置为True C. 将控件的TabStop属性设置为False D. 将控件的Enabled属性设置为False 20. 以下程序可以实现变量x和y的值交换的
是( )。
A. y = x : x = y
B. z = x : x = y : y =z
C. z = x : y = z : x = y
D. z = x : w = y : y = z : x = y
21. Inputbox函数返回值的类型为( )。
A. 数值
B. 字符串
C. 可变类型
D. 数值或字符串
22. 下列程序段的输出结果为（ ）。
A=85
If A>60 Then K=1
If A>70 Then K=2
If A>80 Then K=3
If A>90 Then K=4
Print “K=”; K
A. K=1
B. K=2
C. K=3
D. K=4
23. 设有下列语句:
x=5
if x>0 then y=5
y=10
程序运行后，则下列叙述正确的是（ ）。
A. 变量Y的值是5
B. 变量Y的值是10
C. 变量X的值是5，变量Y的值是5
D. 变量Y的值不能确定
24. 下列程序段的输出结果为( )。
Private Sub Command1_Click( )
A=2 ：B=1
Select Case A
Case 1
Select Case B
Case 0
Print "*****"
Case 1
Print "#####"
End Select
第 3 页 共 3 页
制卷日期： 200 年 月 日
Case 2
Print "@@@@@"
End Select
End Sub A. ***** B. @@@@@ C. ##### D. ##### @@@@@ 25. 正确的逻辑表达式是（ ）。 A. X>Y .AND.NOT Y>Z B. X>Y>Z C. X>Y AND >Z D. X>Y OR Y>Z 26. 下面语句正确的是（ ）。 A. If A ≥ B Then T = A A = B B = T B. If A ≥ B Then T = A； A = B； B = T C. If A >= B Then T = A： A = B： B = T D. If A >= B Then T = A, A = B, B = T 27. 如果X的值小于或等于Y的平方，则打印“OK”,表达这个功能的If语句是（ ）。 A. If x <= y2 Then Print "ok" B. If x <= y ^ 2 Print "ok" C. If x <= y ^ 2 Then "ok" D. If x <= y ^ 2 Then Print "ok" 28. 下面正确的语句是（ ）。 A. If X≠Y Then Print “X不等于Y” B. If X>
学生答案：
ABCCCDCBCABCADABBADBBCDBDCDCC
D
标准答案：
AACCCDCBCABCABDDBADBBCBBDCDCCB
二、程序判断题
得
分
评卷人 复
核
人
1. 控件获得焦点会触发SetFocus事件。
2. 在编写VB程序代码时，表示方法的格式是：
方法名.对象名称。
3. 若要使标签控件显示时不覆盖其背景内客，
应设置标签控件的BackStyle属性。
4. 在程序代码中将命令按钮的value属性值设
为true可以触发命令按钮的单击事件。
5. 可以用“&”，“+”合并字符串，但是用在数
值型变量时，“+”可能会将两个数值加起来。
6. 如果将布尔常量True赋给一个整型变量，则
整型变量的值为1。
7. Visual Basic采用事件驱动的编程机制，编程
者只需编写响应用户操作的程序。
8. 注释语句可以放在代码中的任何位置。
9. 一个对象响应的事件可以有多个，用户不能
建立新的对象事件。
10. 语句 X=Y=Z=4是合法的。
学生答案：TFFTTFFFFF
标准答案：FFTTTFTFTF
