VB程序设计试题及答案一3篇

2024年2月4日发(作者：)

VB程序设计试题及答案一3篇

VB程序设计试题及答案一1

一、单选题

1. VB6.0是一种面向 B 的编程环境。

(A) 机器 (B) 对象

(C) 过程 (D) 应用

2. 要使FormI窗体的标题栏显示“欢迎使用VB"，以下 D 语句是正确的。

(A) n=“欢迎使用VB”

(B) n='欢迎使用VB'

(C) n=欢迎使用VB

(D) n="欢迎使用VB"

3. 若要使命令按钮不可操作，要对 A 属性进行设置。

(A) EnabIed (B)Visible

(C) Backcolor (D)Caption

4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过 C 事件获得输入键值的ASCII码。

(A) Change (B) LostFocus

(C) KeyPress (D) GotFocus

5. 下面 A 是合法的变量名。

(A) X_yz (B) 123ab。 (C) integer (D) __Y

6. 以下关系表达式 中，其值为False的是 A 。

(A) "ABC""AbC" (B) "女""男"

(C) "BASIC"=UCase("basic) (D) "123""23"

7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是 A 。

(A) x=1:y=1:z=1 (B) x=1,y=1,z=1

(C) x=y=z=1 (D) xyz=1

8. VB提供了结构化程序设计的三种基本结构，三种基本结构是

D 。

(A)递归结构、选择结构、循环结构

(B)选择结构、过程结构、顺序结构

(C)过程结构、输入输出结构、转向结构

(D)选择结构、循环结构、顺序结构

9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。

(A) If sex="男" And age=4O And InStr(duty，"教授")O Then n=n+l

(B) If sex="男" And age=4O And (duty="教授" Or duty="副教授")

Then n=n+l

(C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l

(D) If sex="男" And age=4O And duty="教授" And duty="副教授"

Then n=n+l

10.下列关于Do。Loop循环结构执行循环次数的描述正确的是 D 。

(A) Do While。Loop循环和Do。Loop Until循环至少都执行一次

(B) Do While。Loop循环和Do。Loop Until循环可能都不执行

(C) Do While。Loop循环至少执行一次和Do。Loop Until循环可能不执行

(D) Do While。Loop循环可能不执行和Do。Loop Until循环至少执行一次

11.以下 B 是正确的For。Next结构。

(A) For x=1 To Step 10 (B) For x=3 To -3 Step -3

。 。

Next x Next x

(C) For x=1 To 10 (D) For x=3 to 10 step 3

re: 。 。

Next x Next y

If i=10 Then GoTO re

12.如下数组声明语句， B 是正确的。

(A) Dim a[3,4] As Integer

(B) Dim a(3,4) As Integer

(C) Dim a(n,n) As Integer

(D) Dim a(3 4) As Integer

13.下列语句中(假定变量n有值)，能正确声明可变长数组的是 A 。

(A) Dim a( ) As Integer (B) Dim a( ) As Integer

ReDim a(n) ReDim a(n) As String

(C) Dim a( ) As Integer (D) Dim a(10) As Integer

ReDim a(3, 4) ReDim a(n+10)

ReDim Preserve a(4, 4)

14.要想从子过程调用后返回两个结果，下面子过程语句说明合法的是 C 。

(A) Sub f2(ByVal n%, ByVal m%) (B) Sub f1(n%, ByVal m%)

(C) Sub f1(n%, m%) (D) Sub f1(ByVal n%, m%)

15.设有如下程序段：

Public Sub F1(n%)

。

n=3*n+4

。

End Sub

Private Sub Command1_Click( )

Dim n%, m%

n=3

m=4

。

‘调用F1语句

。

End Sub

则在Command1_Click事件中有效的调用语句是 B 。

(A) Call F1(n+m) (B) Call F1(m) (C) Call F1(5) (D) Call F1(m+5)

16.用来设置粗体字的属性是 C 。

(A) FontItalic (B) FontName (C) FontBold (D) FontSize

17.假定定时器的Interval属性为1000，Enabled属性为True，调用下面的事件过程，程序运行结束后变量x的值为 D 。

Dim x As Integer

Sub Timer1_Timer( )

For i=1 to 10

x=x+1

Next i

End Sub

(A) 1000 (B) __ (C) 10 (D) 以上都不对

18.在下列关于通用对话框的叙述中，错误的`是 B 。

(A) nt显示“字体”对话框

(B) 在“打开”或“另存为”对话框中，用户选择的文件名可以经FileTitle属性返回

(C) 在“打开”或“另存为”对话框中，用户选择的文件名机器路径可以经FileName属性返回

(D)

19.当用户按下并且释放一个键后会触发KeyPress、KeyUp和KeyDown事件，这三个事件发生的顺序是 C 。

(A) KeyPress、KeyDown、KeyUp

(B) KeyDown、KeyUp