如图所示，在列表框List1中已经有若干人的简单信息，运行时在Text1文本框（即“查找对象”右边的文本框)输入一个姓或姓名，单击“查找”按钮，则在列表框中进行查找，若找到，则把该人的信息显示在Text2文本框中。若有多个匹配的列表项，则只显示第1个匹配项；若未找到，则在Text2中显示“查无此人”。请填空。Private Sub Command1_Click（) Dim k As Integer

在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表中添加若干列表项。当双击列表框中的某个项目时，在标签Labe1中显示所选中的项如图所示。请在空白处填入适当的内容，将程序补充完整。 Private Sub Form _Load（) List1．AddItem"北京" List1．Addltem"上海" List1．AddItem"河北" End Sub Pri 将列表框对象List1中的一项内容删去，可通过List1的（）方法实现 用户选择的列表框List1中的内容，可以表示为( ) 引用列表框List1被选中项数据应使用( )。 如图所示，在列表框Listl中已经有若干人的简单信息，运行时在Text1文本框（即“查找对象”右边的文本框)输入一个姓或姓名，单击“查找”按钮，则在列表框中进行查找，若找到，则把该人的信息显示在Text2文本框中。若有多个匹配的列表项，则只显示第1个匹配项：若未找到，则在Text2中显示“查无此人”。请填空。 Private Sub Commandl_Click（) Dim k As Intege 在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名消失。下列在List1 Click事件过程中能正确实现上述功能的语句是（)。 下列语句中，获得列表框List1中项目个数的语句是（）。 以下( ) 语句将删除列表框List1中的最后一项。 在一个列表框对象List1中添加一项内容，可通过List1的（）方法实现 清除list1列表框对象的内容的语句是list1.cls（） 下面表示列表框控件List1的最后一个项目 设窗体上有一个列表框控件List1，含有若干列表项。下列能表示当前被选中的列（） 在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Labe1中显示所选中的项目，如图2.2所示。请在空白处填入适当的内容，将程序补充完整。 Private Sub Form_Load（) List1.AddItem "北京" List1.AddItem "上海" List1.AddItem "河北" End 在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。 Do While List2.ListCount______List2.RemoveItem（) Loop 给程序的空白行选择适当的语句。程序段的功能是：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。( ) Do While List2.List Count ______ List2.Removeltem0 Loop 如果列表框List1中没有选定的项目，则执行语句“List1.RemoveItem List1. ListIndex”的结果是 在窗体上画一个名为Label1的标签和一个名为List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label1中显示所选中的项目，如图16-1所示。请在 【9】 和 【10】 处填入适当的内容，将程序补充完整。（2002年9月) Private Sub Form_load（) List1. AddItem"北京" List1. AddItem"上海" Lis 在程序的空白行处填写适当的语句，完成以下功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。 Do While List2.ListCount ______List2. RemoveItem 0 Loop 在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。 Do While List2.ListCount _______ List 2.RemoveItem 0 Loop 在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名消失。下列在List1_Click事件过程中能正确实现上述功能的语句是（）