在一个窗体中能显示多条记录的窗体只有表格式这种类型的窗体。（)

A.纵栏窗体

B.表格式窗体

C.图表式窗体

D.数据交叉表

设计如图9-31所示的窗体。在【输入借书证号】文本框中输入一个借书证号后，单击【查询】按钮，其余文本框中将显示读者的信息。

A.0

B.5

C.6

D.7

在窗体上画一个文本框和—个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1.Text="VB程序设计" End Sub Private Sub Text1_Change() Picture1.Print"VB programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是【 】，而在图片框中显示的内容是【 】。

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Load() Text1.Text="计算机" End Sub Private Sub Text1_Change() Picturel.Print"等级考试" End Sub 程序运行后，在文本框中显示的内容是【 】，而在图片框中显示的内容是【 】。

在窗体上面有一个列表，然后编写如下两个事件过程： Private Sub Form_Click() List1.RemoveItem 1：List1.RemoveItem2 List1.RemoveItem 3 End Sub Private Sub Form_Loab() List1.AddItem "ItemA ":List1.AddItem "Item B" List1.AddItem"Item C"：List1.AddItem "ItemD" List1.AddItem "ItemE" End Sub 运行上面的程序，然后单击窗体，列表框中显示的项目是【 】。

在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1)，然后编写如下几个事件过程： Private Sub Form_Load() Timer1.Enabled=False Timer1.Interval=【 】 End Sub Private Sub Form_Click() Timer1.Enabled=【 】 End Sub Private Sub Timer1_Timer() Label1.Caption=【 】 End Sub 程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟变换一次(见图)。请填空。

列表框中的驱动器时，希望在目录列表框中显示相应驱动器的目录结构，可在Drive1_Change事件中输入语句【 】。

。 程序段首先在文本框中显示“窗体能够触发双击事件”然后将滚文本清除；重复上述过程5次。 Option Explicit Private【 】 Dim k As Integer For k=1 to 100 If k Mod 20 Then 【 】 Else Text1.Text="" End lf Print“程序运行完毕，可再双击窗体” End Sub

A.-5

B.25

C.-1

D.1

在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1)，如图16-11所示，然后编写如下几个事件过程： Private Sub Form_Load() Timer1. Enabled=False Timer1. Interval=【 】 End Sub Private Sub Form_Cliek() Timer1. Enabled=【 】 End Sub Private Sub Timer1_Timer() Label1. Caption=【 】 End Sub 程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟改变一次。请填空。