当前位置：文档库 › VB单选题(第5章)

VB单选题(第5章)

315 用语句Dim A (-3 To 5) As Integer定义的数组的元素个数是().

A) 6

B) 7

C) 8

D) 9

答案 D

316 若有数组说明语句为:Dim a(-3 to 8),则数组a包含元素的个数是().

A) 5

B) 8

C) 11

D) 12

答案 D

317 以下属于合法的数组元素是().

A) x8

B) x[A]

C) x(3)

D) x{6}

答案 C

318 若有数组说明语句为:Dim a(10),则数组a包含元素的个数是().

A) 10

B) 11

C) 8

D) 12

答案 B

319 如果TAB函数的参数小于1,则打印位置在第()列.

A) 0

B) 1

C) 2

D) 3

答案 B

320 为了防止用户随意将光标置于控件上,应().

A) 将控件的TABINDEX属性设置为0

B) 将控件的TABSTOP属性设置为TRUE

C) 将控件的TABSTOP属性设置为FALSE

D) 将控件的ENABLED属性设置为FALSE

答案 D

321 如果要设置窗体的标题栏,应选择以下那种属性().

A) Name

B) Caption

C) Tips

D) Text

答案 B

322 可以惟一标识控件数组中的每一个控件属性的是

A) Name

B) Caption

C) Index

D) Enabled

答案 C

323 有以下的语句:

Option Base 1

Dim xscj(3,4,5) As String

声明的数组xscj有个数组元素.

A) 120

B) 20

C) 12

D) 60

答案 D

324 下面程序段输出的结果是

Private Sub Command1_Click()

Dim a(1 To 3, 4) As Integer

Print LBound(a, 1), UBound(a, 1), LBound(a, 2), UBound(a, 2) End Sub

A) 1 3 0 4

B) 0 3 1 4

C) 1 3 1 4

D) 0 3 0 4

答案 A

325 设执行以下程序段时依次输入11、33、55,执行结果为

Dim a(4) As Integer, b(4) As Integer

For K = 0 To 2

a(K + 1) = Val(InputBox("请输入数据"))

b(3 - K) = a(K + 1)

Next K

Print b(K)

A) 11

B) 33

C) 55

D) 0

答案 A

326 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1

Private Sub Command1_Click()

Dim a As Variant

a = Array(1, 2, 3, 4, 5)

Sum = 0

For i = 1 To 5

Sum = Sum + a(i)

Next i

x = Sum / 5

For i = 1 To 5

If a(i) > x Then Print a(i);

Next i

End Sub

程序运行后,单击命令按钮,在窗体上显示的内容是

A) 1 2

B) 1 2 3

C) 3 4 5

D) 4 5

答案 D

327 有以下程序:

Option Base 1

Dim arr() As Integer

Private Sub Form_Click()

Dim i As Integer,j As Integer

ReDim arr(3,2)

For i=1 To 3

For j=1 To 2

arr(i,j)=i*10+j

Next j

Next i

ReDim Preserve arr(3,4)

For j=3 To 4

arr(3,j)=10*j+5

Next j

Print arr(3,2);arr(3,4)

End Sub

程序运行后,单击窗体,输出结果为

A) 0 22

B) 31 35

C) 32 45

D) 0 0

答案 C

328 要分配存放如下方阵的数据：

1.1

2.2

3.3

4.4

5.5

6.6

7.7 8.8 9.9

数组声明语句能实现（不能浪费空间）的是

A) Dim a(9) As Single

B) Dim a(3,3) As Single

C) Dim a (-1 To 1,-5 To -3) As Single

D) Dim a (-3 To 1,-5 To 7) As Integer

答案 C

329 如下数组声明语句:Dim a(3,-2 To 2,5),则数组a包含的元素的个数为

A) 120

B) 75

C) 60

D) 13

答案 A

330 以下程序

Dim a

a=Array(1,2,3,4,5,6,7)

For i=Lbound (((A) To Ubound (((A)

a(i)=a(i)*a(i)

Next i

Print a(i)

输出结果是

A) 49

B) 0

C) 不确定

D) 程序出错

答案 D

331 以下程序

Option Base 1

Private Sub Command1 _Click()

Dim a%(3,3)

For i=1 To 3

For j=1 To 3

If j＞1 And i＞1 Then

a(i,j)=a(a(i-1,j-1),a(i,j-1))+1

Else

a(i,j)=i*j

End If

Print a(I,j);"";

Next j

Next i

End Sub

输出结果是

A) 1 2 3

2 3 1

3 2 3

B) 1 2 3

1 2 3

C) 1 2 3

2 4 6

3 6 9

D) 1 1 1

2 2 2

3 3 3

答案 A

332 以下程序

Option Base 1

Private Sub Command1_Click()

Dim a,B(3,3)

a=Array(1,2,3,4,5,6,7,8,9)

For i=1 To 3

For j=1 To 3

B(i,j)=a(i*j)

If(j＞=i) Then Print Tab(j*3);format(B(i,j),"###");

Next j

Next I

End Sub

输出结果是

A) 1 2 3

4 5 6

7 8 9

B) 1

4 5

7 8 9

C) 1 4 7

2 4 6

3 6 9

D) 1 2 3

4 6

答案 D

333 已知有数组声明:Dim a(-1 To 3,2 To 5)As integer,如下引用数组中的元素,正确的是

A) a(-1,2)

B) a(4)

C) a[-1,2]

D) a(0,6)

答案 A

334 下列有关控件数组与一般控件的区别的叙述中,最合理的是

A) 控件数组一定由多个同类型的控件组成,一般控件只有一个控件;

B) 控件数组的Index为0,而一般控件的Index为空;

C) 控件数组的Index为1,而一般控件的Index为0;

D) 控件数组的建立通过Dim语句声明,而一般控件不必声明.

答案 A

335 在窗体上添加一个命令按钮，编写如下代码：

Private Sub Command1_Click

Dim Arr1(10) as Integer ,Arr2(10) As Integer

N=3

For i=1 to 5

Arr1(i)=i

Arr2(n)=2*n+i

Next i

Print Arr2(n), Arr1(n)

End Sub

程序运行后，单击命令按钮，输出结果是

A) 11 3

B) 3 11

C) 13 3

D) 3 13

答案 A

336 在窗体上添加一个命令按钮，编写如下代码：

Option Base 1

Private Sub Command1_Click

Dim a(10) As Integer,p(3) As Integer

k=5

For i=1 To 10

a(i)=i

Next i

For i=1 To 3

p(i)=a(i*i)

Next i

For i=1 To 3

k=k+p(i)*2

Next i

Print k

End Sub

程序运行后，单击命令按钮，输出结果是

A) 35

B) 28

C) 33

D) 37

答案 C

337 在窗体上添加一个命令按钮，编写如下代码：

Option Base 1

Private Sub Command1_Click

Dim a

A=Array(1,2,3,4)

J=1

For i=4 To1 Step -1

S=s+a(i)*j

J=j*10

Next i

Print s

End Sub

程序运行后，单击命令按钮，输出结果是

A) 4321

B) 12

C) 34

D) 1234

答案 D

338 以下程序输出的结果是:

Private Sub Form_Activate()

Dim a

a=Array(1,2,3,4,5)

For i=Lbound(A) To Ubound(A)

A(i)=i*a(i)

Next i

Print i, Lbound(A) , Ubound(A) , a(i)

End Sub

A) 4 0 4 20

B) 5 0 4 20

C) 不确定

D) 程序出错

答案 D

339 如下数组声明语句，正确的是

A) Dim a[3,4]As Integer

B) Dim a(3,4)As Integer

C) Dim a(n,n) As Integer

答案 B

340 用下面语句定义的数组的元素个数是()

Dim A (-3 To 5) As Integer

A) 6

B) 5

C) 8

D) 9

答案 D

341 用下面语句定义的数组的元素个数是()

Dim A (-2 To 4) As Integer

A) 6

B) 5

C) 7

D) 8

答案 C

342 在窗体中添加一个命令按钮,然后编写如下代码: Private Sub Command1_Click()

ReDim this(4)

For i = 1 To 4

this(i) = i * 3

ReDim this(6)

For i = 1 To 6

this(i) = this(i) + i

Print this(3);this(6)

End Sub

程序运行后,则窗体上显示的内容为()

A) 3 6

B) 10 6

C) 12 6

D) 8 0

答案 A

343 激活属性窗口使用的键是().

A) F2

B) F3

C) F4

D) F5

答案 C

344 退出VisualBasic的快捷键是().

A) Ctrl+Q

B) Shift+Q

C) Alt+Q

D) Ctrl+Alt+Q

答案 C

345 除了系统默认的工具箱布局外,在VisualBasic中还可以通过()方法来定义选项卡组织安排控件.

A) 在工具箱单击鼠标右键,执行快捷菜单中的"添加选项卡"命令

B) 执行"文件"菜单中的"添加工程"命令

C) 执行"工程"菜单中的"添加窗体"命令

D) 执行"工程"菜单中的"部件"命令

答案 A

346 如果在图片框上使用绘图方法绘制一个圆,则图片框的()属性不会对该圆的外观产生影响.

A) BackColor

B) ForeColor

C) DrawWidth

D) DrawStyle

答案 B

347 下列()属性可返回目录列表框的路径.

A) path

B) drive

C) pathroad

D) initdir

答案 A

348 控件是().

A) 建立对象的工具

B) 设置对象属性的工具

C) 编写程序的编辑器

D) 建立图形界面的编辑窗口

答案 A