如果要在窗体上画一个标签，应在工具箱窗口中选择的图标是

A．

C．

口把列表框中的项目设置为：“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮。即可将所选择的项目删除，并在标签中显示列表框当前的项目数，运行情况如图16-5所示(选择“第三个项目”的情况)。下面是实现上述功能的程序，请填空。 Private Sub Command1_C1ick() If List1. List1adex＞=【 】Then List1. Removeltem【 】 Label1. Caption=【 】 Else MsgBox "请选择要删除的项目" End If End Sub

A.使用字段列表把一个结合控件放在窗体上，直接从字段列表中拖动所要的字段

B.使用与工具箱连接在一起的字段列表，可以在窗体上放置结合控件{与表或查询中的字段链接的控件)

C.拖动该窗口的边调整字段列表的大小，从而可以看到任何长字段名

D.如果选择的控件与字段的数据类型不适合，Access将选择该数据类型的默认控件

在窗体上画一个命令按钮和一个标签，其名称分别为Commandl和Labell，然后编写如下事件过程： Private Sub Commandl_Click() Counter=0 Fori=1T04 Forj=6 To 1 Step-2 Counter=Counter+1 Nextj Nexti Labell.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是

A．11

B．12

C．16

D．20

（6）在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为 Text1、Label1 和 Command1，然

后编写如下两个事件过程：

Private Sub Command1_Click()

S$=InputBox("请输入一个字符串")

Text1.Text=S$

End Sub

Private Sub Text1_Change()

Label1.Caption=UCase(Mid(Text1.Text, 7))

End Sub

程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，

则在标签中显示的内容是 【6】 。

在窗体上画一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10, 10)As Integer Dimi As Integer, j As Integer For i=2 To 4 For j=2 To 4 arr(i, j)=i*j Next j Next i Label1. Caption=Str(arr(2, 2)+arr(3, 3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是______。

A．12

B．13

C．14

D．15

在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是()。

A．Private Sub Text1_Change() Label1．Caption=Text1．Text End Sub

B．Private Sub Label 1_Change() Label1．Caption=Text1．Text End Sub

C．Private Sub Text1_Click() Label1．Caption=Text1．text End Sub

D．Private Sub Label1_Click() Label1．Caption=Text1．Text End sot

在窗体上画一个名称为CommRnd1的命令按钮，一个名称为Labell的标签，然后编写如下事件过程：

Private Sub Command1 Click()

s=0

For i=1 TO 15

x=2*i-1

if x Mod 3；0 Then s=s+l

Next i

Labe11.Caption=s

End Sub

程序运行后，单击命令按钮，则标签中显示的内容是上【 】。