第二章(1) 标准控件 一、选择题 1 文本框的属性不包括( A )。 A

第二章（1）标准控件

一、选择题

1. 文本框的属性不包括( A )。

A. Caption

B. Text

C. Name

D. Top

2. 在属性窗口中设置命令按钮的Caption属性为"&End"，则( A )是该命令按钮的快捷访问键。

A. Alt+E

B. Ctrl+E

C. Shift+E

D. Ctrl+Shift+E

3. 设置命令按钮的( B )属性值为False，可以使命令按钮处于不可用状态。

A. Value

B. Enabled

C. Default

D. Cancel

4. 下列设置中，可以使计时器Timer1停止计时的是( D )。

A. Timer1.Locked=True

B. Timer1.Locked=False

C. Timer1.Enabled=True

D. Timer1.Enabled=False

5. 设置标签的的显示内容的属性是( C )。

A. Name

B. Text

C. Caption

D. Top

6. 为了将复选框(名称为Check1)设置为选中状态，应该使用( A )语句。

A. Check1.Value=1

B. Check1.Value=0

C. Check1.Value=True

D. Check1.Value=False

7. 单选按钮处于选中状态时,它的Value属性值是( B )。

A. False

B. True

C. 0

D. 1

8. 下列关于组合框的叙述中，正确的是(C )。

A. 组合框有Click事件，没有Change事件

B. 组合框有Change事件，没有Click事件

C. 组合框既有Click事件，也有Change事件

D. 组合框没有Click事件和Change事件

9. 设置( A )属性，可以使图片显示在图片框或图像框中。

A. Picture

B. Image

C. Icon

D. DownPicture

10. 在图像控件Image1中加载图片后，为使图像控件能够自动调整大小而显示整幅图片,可以使用语句( D )。

A. Image1.AutoSize=True

B. Image1.AutoSize=False

C. Image1.Stretch=True

D. Image1.Stretch=False

11. 在图片框控件Picture1中加载图片后，为使图片框控件能够自动调整大小而显示整幅图片，可以使用语句( A )。

A. Picture1.AutoSize=True

B. Picture1.AutoSize=False

C. Picture1.Stretch=True

D.

Picture1.Stretch=False

12. 下列不能接收焦点的控件是( B )。

A. 命令按钮

B. 标签框

C. 文本框

D. 单选按钮

13. 下列控件中( D )不能触发GetFocus和LostFocus事件。

A. 命令按钮

B. 组合框

C. 复选按钮

D. 计时器

14. 下列操作中，能够触发滚动条的Scroll事件的是( D )。

A. 单击滚动条两端的滚动箭头

B. 单击滚动条上滑块两侧的空白处

C. 单击滚动条上的滑块

D. 拖动滚动条上的滑块

15. 窗体中包含3个同名命令按钮CmdNum, 其Caption分别等于对应下标值0，1，2；依次单击这三个按钮，窗体中的输出结果是( C )。

Private Sub cmdNum_Click(Index as Integer)

Print Index

End Sub

A. 0

B. 0

C. 0

D. 012

0 1

0 2

16. 在窗体上有一个文本框控件，名称为Text1；一个计时器控件，名称为Timer1。要求每秒钟在文本框中显示一次当前时间。请将程序填完全。

Private Sub Timer1_【】( C )

Text1=Time

End Sub

A. Visible

B. Interval

C. Timer

D. Enabled

17. 下列事件过程的功能是：在加载窗体时，启动计时器，并使计时器每隔1秒钟触发一次Timer事件。请填空。

Private Sub Form_Load( A )

【】

End Sub

A. Timer1.Interval = 1000

B. Timer1.Interval = 1

C. Timer1.Enabled = 1000

D. Timer1.Enabled = 1

18. 在窗体上有一个文本框控件,名称为Text1；程序运行后,要求文本框中只能接收数字字符。请填空。

Private Sub Text1_【C 】(KeyAscii As Integer)

If KeyAsciiAsc("9") Then

KeyAscii = 0

End If

End Sub

A. KeyDown

B. KeyUp

C. KeyPress

D. Change

19. 设窗体中包含1个命令按钮Command1，1个列表框List1，并有以下的事件过程。程序运行后，单击Command1按钮，列表框中显示的内容是( A )。

Private Sub Command1_Click()

Dim i As integer

For i = 10 To 1 step -1.5

List1.AddItem i

Next i

End Sub

A. 10, 8, 6, 4, 2

B. 10, 9, 7, 5, 3

C. 10, 8.5, 7, 5.5, 4, 2.5

D. 8.5, 7, 5.5, 4, 2.5,

1

20. 使用( C )方法，可以同时清除列表框的所有项目。

A. RemoveItem

B. Remove

C. Clear

D. Move