在窗体上画一个名称为Labell的标签，然后编写如下事件过程。 Private Sub Form_Click（)Dim arr（10

在窗体上画一个名称为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

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

在窗体上画一个名称为Labell的标签，然后编写如下事件过程： Option Base 1 Private Sub Form. Click() Dim a(10)As Integer For k=1 To 10 a(k)=k^2 Next k Label1.Caption=a(k) End Sub 程序运行后，单击窗体，在标签中显示的内容是 ______。

A．100

B．10

C．121

D．出错信息

在窗体上画一个名称为Commandl的命令按钮，一个名称为Labell的标签，然后编写如下事件过程： Private Sub Commandl_Click() S=0 Fori=1 To 15 x=2*i-1 If x Mod3=0 Thens=S+1 Nexti Labe11.Caption=S End Sub 程序运行后，单击命令按钮，则标签中显示的内容是()。

A．1

B．5

C．27

D．45

在窗体上画一个名称为Labell的标签，然后编写如下事件过程： Option Base 1 Private Sub Form_Click() Dim a(20) As Integer For k=1 To 20 a(k)=k^2 Next k Label1.Caption=a(k) End Sub 程序运行后，单击窗体，在标签中显示的内容是 ______。

A．400

B．20

C．441

D．出错信息

序如下： Private Sub Command1_Click() Timer1．Enabled=True Timer1．Interval=1000 End Sub Private Sub Timerl_timer() Labell．Caption=Time End Sub 当运行程序后，单击命令按钮，将在标签中显示的内容为

A．Time

B．True

C．1000

D．10：06：55

列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。

A．Private Sub Listl_Click() Labell.Capfion=Listl.Listlndex End Sub

B．PrivateSubLial click() Labell.Name=Listl.Listlndex End Sub

C．PrivateSubListl click() Labell.Name=Listl.Text End Sub

D．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub

框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是：______。

A． Private Sub Listl_Click() Labell.Caption=Listl.ListIndex End Sub

B．Private Sub Listl_Click() Labell.Name=Listl.ListIndex End Sub

C．Private Sub Listl_click() Labell.Name=Listl.Text End Sub

D．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub

写程序如下： Private Sub Command1_Click() Timer1．Enabled=True Timer1．Interval=1000 End Sub Private Sub Timerl Timer() Labell．Left=Labell．Left + 10 End Sub 当运行程序后，单击命令按钮，将会产生

A．每秒钟显示一次系统时间

B．每10秒钟显示一次系统时间

C．每秒钟标签向右移一段距离

D．每秒钟标签向左移一段距离

表项。当双击列表框中的某个项目时，在标签Labell中显示所选中的项目，如图所示。请在______处填入适当的内容，将程序补充完整。

Private Sub Form. load()

Listl.AddItem “北京”

List1.AddItem “上海”

List1.AddItem “河北”

End Sub

Private Sub ______()

Labell.Caption=______

End Sub

列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是 ______。

A．Private Sub List1_Click() Label1.Caption=List1.ListIndex End Sub

B．Private Sub List1_click() Label1.Name=List1.ListIndex End Sub

C．Private Sub List1_click() Label1.Name=List1.Text End Sub

D．Private Sub List1_Click() Label1.Caption=List1.Text End Sub