窗体上有1个名称为List的列表框，其中已经输入了若干个项目（如图所示）：还有2个文本框，名称分别为Text1、Text2, 1个名称为 Command1的命令按钮，并有以下程序

Private Sub Command1_Click（）

D．im str As String, s As String, k As Integer

s=Text1

Str=””

F．or k=List1.ListCount-1 to 0 Step-1

If InStr（List.List（k）,s）>0 then

str=str&List.List（k）&” ”

E．nd If

Next k

If str=””Then

Text2=”没有匹配的项目”

E．lse

Text2=str

E．nd If

E．nd Sub

程序运行时，在Text1中输入“京”，单击命令按钮，则在Text2中显示的内容是（ ）。

A．京

B．北京 南京

C．南京

D．没有匹配的项目

[单选题]窗体上有一个名为List1的列表框，其中已经输入了若干个项目(如图所示)；还有两个文本框，名称分别为Text1、Text2，一个名称为Command1的命令按钮，并有以下程序： Private Sub Command1_Click() Dim str As String,s As String,k As Integer s=Text1 str="" For k=List1.ListCount-1 To 0 Step-1 IfInStr(List1.List(k),s)＞0 Then str=

[单选题]窗倒上有1个名为List1的列表框，其中已经输入了若干个项目(如图3所示)；还有2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有以下程序：程序运行时，在Text1中输入“京”，单击命令按钮，则在Text2中显示的内容是（ ）。A． 京B． 北京南京C． 南京北京D． 没有匹配的项目

[单选题]（ 15 ）设在窗体 Form1 上有一个列表框 List1 ，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是A．)Prvate Sub List1_Click()Print List1.TextE．nd SubB．)Private Sub Form1_Click()Print List1.TextE．nd SubC．)Private Sub List1_Click()Print Form1.TextE．nd SubD．)Private Sub Form1_Cl

[单选题]设在窗体中有一个名称为Listl的列表框，其中有若干个项目(如图)。要求选中某一项后单击Commandl按钮，就删除选中的项，则正确的事件过程是。A．Private SubCommandl_Click List1.Clear End Sub B．Private Sub Commandl_Click List1.Clear Listl.ListIndex End Sub C．Private Sub Commandl_Click List1.RemoveItem List1.ListIndex En

[单选题]设在窗体Forml上有一个列表框Listl，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是。 A．Private Sub Listl_Click B．Private Sub Forml_Click Print Listl．Text Print Listl．Text End Sub End Sub C．Private Sub Listl_Click D．Private Sub Forml_Click Print Forml．Text Listl．Print Lis

[单选题]在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名消失。下列在List1_Click事件过程中能正确实现上述功能的语句是A．List1．Removeltem List1．TextB．List1．Removeltem List1．CIearC．List1．Removeltem List1．ListCountD．List1．Removeltem List1．Listlndex

[单选题]（ 31 ） 窗体上有 List1 、 List2 两个列表框 ， List1 中有若干列表项 （ 见图 ） ， 并有下面的程序：Private Sub Comand1_Click （）F．or k=List1.ListCount-1 To 0 Step -1If List1.Selected （ k ） ThenList2.AddItem List1.List （ k ）List1.RemoveItem kE．nd IfNext kE．nd Sub程序运行时，按照图示在 List1 中选中 2

[单选题]在窗体上有一个列表框，名称为List1，该列表框中有三个选项，分别为“123”、“456”和“789”，当前没有任何选项被选中，则执行List1．RemoveItem List1．ListIndex语句后，移去的是( )。A．123B．456C．789D．出错

[单选题]在窗体上有一个名称为List1列表框和一个名称为Command1的按钮，List1的MultiSelect属性设置为2。当单击Command1按钮时，将会把所有选中的选项全部删除。下列程序缺少的一句是______。Private Sub Command1_ Click () for i = List1. ListCount- 1 To 0 Step- 1 if ______ = True then List1. RemoveItem i End if Next iEnd SubA．List1.S

[单选题]在窗体上画一个List1的列表框,一个名称为Label1的标签,列表框中显示若干个项目,当单击列表框中的某个项目时,在标签中显示被选中的项目的名称,下列能正确实现上述操作的程序是( )。A．) Private Sub List1_Click()Label1.Caption = List1.ListIndexE．nd SubB．) Private Sub List1_Click()Label1.Name = List1.ListIndexE．nd SubC．) Private Sub List1_