在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
A: Private Sub List1_Click()
B: Label1.Caption=List1.ListIndex
C: End Sub
D: Private Sub List1_Click()
E: Label1.Name=List1.ListIndex
F: End Sub
G: Private Sub List1_Click()
H: Label1.Name=List1.Text
I: End Sub
J: Private Sub List1_Click()
K: Label1.Caption=List1.Text
L: End Sub
A: Private Sub List1_Click()
B: Label1.Caption=List1.ListIndex
C: End Sub
D: Private Sub List1_Click()
E: Label1.Name=List1.ListIndex
F: End Sub
G: Private Sub List1_Click()
H: Label1.Name=List1.Text
I: End Sub
J: Private Sub List1_Click()
K: Label1.Caption=List1.Text
L: End Sub
举一反三
- 在窗体上画一个名称为Listl的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是 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
- 在窗体上添加一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中的城市名称。下列能正确实现上述功能的程序是____。 A: Private Sub Combo1_Click() Label1.Caption = List1.ListIndex EndSu B: Private Sub Combo1_Click() Label1.Name = List1.ListIndex EndSu C: Private Sub Combo1_Click() Label1.Caption = List1.Text EndSu D: Private Sub Combo1_Click() Label1.Name = List1.Text EndSu
- 在窗体上画一个名称为Listl的列表框，一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是（ ） A: Private Sub Listl_C1ick( ) B: Labell.Caption＝list1.listlndex End Sub C: Private Sub Listl_C1ick( ) D: Labell.Name＝Listl.listindex End Sub E: Private Sub Listl_C1ick( ) F: Labell.Caption＝list1.text End Sub G: Private Sub Listl_C1ick( ) H: Labell.Name＝Listl．text End Sub
- 在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是( )。 A: Private Sub Text1 Change() B: Label1．Caption=Text1．Text C: End Sub D: Private Sub Label1 Change() E: Label1．Caption=Text1．Text F: End Sub G: Private Sub Text1 Click() H: Label1．Capnon=Text1．text I: End Sub J: Private Sub Label1 Click() K: Label1．Caption=Text1．Text L: End sot
- 设窗体上有一个标签Label 1和一个计时器Timer1，Timer1的Interval属性被设置为1000， Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。下列可以实现上述要求的事件过程是( )。 A: Private Sub Timer1_Timer() Labell.Caption=True End Sub B: Private Sub Timer1_Timer() Labell.Caption=Time$ End Sub C: Private Sub Timer1_Timer() Labell.Interval=1 End Sub D: Private Sub Timer1_Timer() For k=1 To Timerl.Interval Label1.Caption=Timer Next K End Sub