1．下列控件中没有Caption属性的是 ________。

A）框架

B）列表框

C）复选框

D）单选按钮

2．复选框的Value 属性为 1 时，表示 ________。

A）复选框未被选中

B）复选框被选中

C）复选框内有灰色的勾

D）复选框操作有误

3．用来设置斜体字的属性是 ________。

A）FontItalic

B）FontBold

C）FontName

D）FontSize

4．将数据项“China”添加到列表框List1中成为第二项应使用 ________语句。

A）List1.AddItem “China”,1

B）List1.AddItem “ China ”, 2

C）List1.AddItem 1,“China”

D）List1.AddItem 2,“ China ”

5．引用列表框List1最后一个数据项，应使用 ________语句。

A）List1.List(List1.ListCount）

B）List1.List(ListCount)

C）List1.List(List1.ListCount-1）

D）List1.List(ListCount-1)

6．假如列表框List1有四个数据项，那么把数据项“China”添加到列表框的最后，应使用 ________语句。

A）List1.AddItem 3,“ China ”

B）List1.AddItem “ China ”, List1.ListCount-1

C）List1.AddItem “ China ”, 3

D）List1.AddItem “China”， List1.ListCount

7．执行了下面的程序后，列表框中的数据项有________。

Private Sub Form_Click()

For i = 1 to 6

List1.AddItem i

Next i

For i = 1 to 3

List1.RemoveItem i

Next i

End Sub

A）1，5，6

B）2，4， 6

C）4，5，6

D）1，3，5

8．如果列表框List1中没有选定的项目，则执行

List1.RemoveItem List1.ListIndex 语句的结果是 ________。

A）移去第一项

B）移去最后一项

C）移去最后加入列表中的一项

D）以上都不对

9．如果列表框List1中只有一个项目被用户选定，则执行

Debug.Pring List1.Selected(List1.ListIndex）语句的结果是________。

A）在Debug窗口输出被选定的项目的索引值

B）在Debug窗口输出True

C）在窗体上输出被选定的项目的索引值

D）在窗体上输出True

10．假定时钟控件的Interval 属性为1000，Enabled属性为True，并且有下面的事件过程，程序结束后变量x的值为________。

Dim x Integer

Private Sub Timer1_Timer()

For i = 1 to 100

x = x + 1

beep

Next i

End Sub

A）1155

B） 1000

C ）100

D）以上都不对 [page]

11．下列说法中正确的是 ________。

A）通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上

B）在列表框中不能进行多项选择

C）在列表框中能够将项目按字母从大到小排序

D）框架也有Click和DblClick事件

12．为了防止用户随意将光标置于控件之上，应将进行________设置。

A）将控件的TabIndex属性设置为0

B）将控件的TabStop属性设置为True

C）将控件的TabStop属性设置为False

D）将控件的Enabled属性设置为False

13．滚动条产生Change事件是因为 ________值改变了。

A）SmallChange

B）Value

C）Max

D）LargeChange

14．如果要每隔15s产生一个Timer事件，则Interval属性应设置为________。

A）15

B） 900

C ）15000

D）150

15．列表框的 ________属性是数组。

A）List 和 ListIndex

B）List 和 ListCount

C）List 和 Selected

D）List 和 Sorted

16．下列关于键盘事件的说法中，正确的是________。

A）按下键盘上的任意一个键，都会引发KeyPress事件

B）大键盘上的“ 1” 键和数字键盘的“ 1” 键的KeyCode码相同

C）KeyDown和KeyUp的事件过程中有KeyAscii参数

D）大键盘上的“ 4” 键的上档字符是“$”，当同时按下Shift和大键盘上的“ 4” 键时，KeyPress事件过程的KeyAscii参数值是“$”的ASCII值

17．为确保文本框中输入的全部是数字的最佳方法是________。

A）在KeyDown或KeyUp的事件过程中摒弃非数字输入

B）在Validate事件过程中利用IsNumeric函数

C）在Chinge事件过程中利用IsNumeric函数

D）在KeyPress的事件过程中摒弃非数字输入

18．用户在使用ActiveX控件之前，需要将他们加载到工具箱中，下面________操作可进行ActiveX控件的加载。

A）工程"部件…

B）视图"工具箱

C）工具"选项…

D）工程"引用

19．在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：

Private Sub Form_Load ()

List1.AddItem"357"

List1.AddItem"246"

List1.AddItem"123"

List1.AddItem"456"

Text1.Text=""

End Sub

Private Sub List1_ DblClick ( )

a =List1.Text

Print a+Text1.Text

End Sub

程序运行后，在文本框中输入"789"，然后双击列表框中的"456"，则输出结果为________。

A）1245

B） 456789

C ）789456

D）0

20．在窗体上画一个列表框，然后编写如下两个事件过程：

Private Sub Form_Click()

List1.RemoveItem 1

List1.RemoveItem 3

List1.RemoveItem 2

End Sub

Private Sub Form_Load()

List1.AddItem "ItemA"

List1.AddItem "ItemB"

List1.AddItem "ltemC"

List1.AddItem "ItemD"

List1.AddItem "ItemE"

End Sub

运行上面的程序，然后单击窗体，列表框中所显示的项目为________。

A）ItemA与ItemB

B）ItemB与ItemD

C）ItemD与ItemE

D）ItemA与ItemC