2020年计算机二级VB选择试题及答案

一、选择题

1、任何控件都有的属性是( )。

A.BackColor

B.Caption

https://www.360docs.net/doc/695999714.html,

D.BorderStyle

2、设计数据库的存储结构属于( )

A.需求分析

B.概念设计

C.逻辑设计

D.物理设计

3、某人创建了1个工程，其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是( )。

A.在工程属性对话框中把"启动对象"设置为Form2

B.在Forml 的Load 事件过程中加入语句Load Form2

C.在Form2的Load 事件过程中加入语句Form2.Show

D.把Form2的TabIndex 属性设置为l ，把Form1的TabIndex 属性设置为2

4、设有如下通用过程：

Public Function Fun(xStr As Stri ng)As Stri ng

Di mt Str As Stri ng ，strLAs Integer

tStF=""

strL=Len(xStr)

i =1 Do While i n

i =i -n

Loop

Print i

End Sub

A.2

B.4

C.5

D.3

7、复选框的Value 属性为0时，表示该复选框( )。

A.未被选中

B.被选中

C.框内有灰色的勾

D.操作有误

8、在窗体上有一个名称为Check1的复选框数组(含4个复选框)，还有一个名称为Text1的文本框，初始内容为空。程序运行时，单击

任何复选框，则把所有选中的复选框后面的方字罗列在文本框中(见图)。下面能实现此功能的事件过程是( )。

A.Private Sub Check1_Click(Index As Integer)

Text1.Text =""

For k =0To 3

If Check1(k).value =1Then

Text1.Text =Text1.Text &Check1(k).Caption &""双引号中是空格 End If Next k

End Sub

B.Private Sub Check1_Click(Index As Integer)

For k =0To 3

If Check1(k).Value =1Then

Text1.Text =Text1.Text &Check1(k).Caption &""双引号中是空格

End If

Next k

End Sub

C.Private Sub Check1_Click(Index As Integer)

Text1.Text ="" For k =0To 3 If Check1(k).Value =1Then

Text1.Text =Text1.Text &Check1(Index).Caption &""双引号中是空格

End If

Next k