(32）设窗体上有一个名为List 1的列表框，并编写下面的事件过程：

Private Sub Listl_C1ick()

D．im ch As String

C．h=Listl．List(List l .ListIndex)

Listl.RemoveItem Listl.ListIndex

Listl.AddItem ch

E．nd Sub

程序运行时，单击一个列表项，则产生的结果是

A．）该列表项被移到列表的最前面

B．）该列表项被删除

C．）该列表项被移到列表的最后面

D．）该列表项被删除后又在原位置插入

[单选题]设窗体上有_个名为Listl的列表框，并编写下面的事件过程：Private Sub Listl_Click()D．im ch As Stringch=Listl．List(Listl．Listlndex)Listl，RemoveItem Listl．ListIndexListl．Addltem chE．nd Sub程序运行时，单击一个列表项，则产生的结果是A．该列表项被移到列表的最前面B．该列表项被删除C．该列表项被移到列表的最后面D．该列表项被删除后又在原位置插入

[单选题]设窗体上有一个名为List1的列表框，并编写下面的事件过程：程序运行时单击一个列表项，则产生的结果是（　　）。A.该列表项被移到列表的最前面B.该列表

[单选题]（13）窗体上有一个列表框和一个文本框，编写下列两个事件过程： Private Sub Form_Load() List1.AddItem"北京" List1.AddItem"天津" List1.AddItem"上海" Text1.Text="" End Sub Private Sub List1_Click() Print Text1.Text+List1.text End Sub 程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是A.中国北京 B.中

[单选题]窗体上有一个列表框和一个文本框，编写下列两个事件过程：Private Sub Form. Load()List1.Addltem"北京"List1.Addltem"天津"List1.Addltem"上海"Text1.Text=""E．nd SubPrivate Sub List1 Click()Print Text1.Text+List1.TextE．nd Sub程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是( )。A．中国北京B．中国天津C．中国上

[单选题]窗体上有一个列表框，编写下列程序： Private Sub Command1_Click() ListRemoveItem3 End Sub Private Sub Form_Load() ListAddItem "拉瓦锡" ListAddItem "道尔顿" ListAddItem "汤姆森" ListAddItem "门捷列夫" End Sub 程序执行时，单击Commandd1，则在列表框中将不再出现 ______。A．拉瓦锡B．道尔顿C．汤姆森D．门捷列夫

[单选题]（17）在窗体上有一个文本框，其名称为Text1，编写下列事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer ) Dim str As String Str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Test=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”则在文本框Text3中显示的内容为 A.aaa B.AAA C.AA D.aa

[单选题]窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：Private Sub Command1_Click( )

[单选题]窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：程序运行时，选中一个列表项，然后单击Command1按钮，

[单选题]在窗体上画一个名为List1的列表框、一个名为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。A．Private Sub List1_Click() Label1. Caption=List1. ListIndex End SubB．Private Sub List1_Click() Label1. Name=List1. ListIndex End SubC．Private Sub List1

[单选题]（23）窗体上有一个命令按钮Command1和一个列表框List1.先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Commandl_Click() Dim In As Integer In___________ List.Remove Ind End Sub 则在程序的空白行的语句是 A.List1.Index B.List1.ListIndex C.List1.Text D.List1.ListCount