违法和不良信息举报 联系客服
免费注册 登录

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

题目

设在窗体中有一个名称为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 End Sub D．PrivateSubCommandl_Click List1.RemoveItem End Sub

如果没有搜索结果或未解决您的问题，请直接 联系老师 获取答案。
相似问题和答案

第1题：

在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为；显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。

要求；

修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。


正确答案：

第2题：

设在窗体中有一个名称为List1的列表框，其中有若干个项目(如图)。要求选中某一项后单击Command1按钮，就删除选中的项，则正确的事件过程是（ ）。

A.Private Sub Command1 Click（ ） List1，Clear End Sub

B.Private Sub Command1 Click（ ） List1．Clear List1．ListIndex End Sub

C.Private Sub Command1 Click（ ） List1 Removeltem List1．ListIndex End Sub

D.Private Sub Command1 Click（ ） List1．Removeltem End Sub


正确答案：C
C。【解析】在．VisualBasic中列表框的clear方法是用来删除所有列表项，RemoveItem方法是删除指定的列表项，而列表框的Index属性表示选中的列表项的位置；本题是删除选中的列表项，故应选C。

第3题：

阅读以下应用说明以及用Visual Basic开发过程中所编写的程序代码。

[应用说明]

某应用程序在运行过程中的一个界面如下图所示：

在“供选课程”列表框(名为Listl)中选择某个课程后，再单击“，”按钮(名称为cmdSelect)，就能将该课程复制到“所选课程”列表框(名称为List2)中(但要注意不要出现重复项)：如果单击“＞＞”按钮(名称为cmdSelAll)，就能将全部供选课程名复制到列表框List2中(注意应先删除List2中的已选项)；如果在“所选课程”列表框中选中某个课程，再单击“＜”按钮(名称为emdDelete)，就会从List2中删除该课程(未选课程时应不做处理)；如果单击“＜＜”按钮(名称为cmdDelAll)，就会从List2中删除所有已选课程。

[Vsual Basic 程序代码]

Private Sub CmdSelect_Cliek()

For i = O To List2.ListCount - 1

If Listl.Text = List2.List(i) Then Exit Sub '不要重复选择

Next i

List2.Addltem (1) '在List2中增添List1中所选的项

End Sub

Private Sub CrndSelAll_Click()

List2.Clear '先删除List2中的已有项

For i = 0 To (2) '对List1中所有各项做循环处理

List2.Addltem (3) '将该项增添到 List2中

Next i

End Sub

Private Sub CmdDelete_Cliek()

If List2.Listlndex ＞= O Then '如果List2中有选中的项,

List2.Removeltem (4) '则删除所选的项

End If

End Sub

Private Sub CmdDelAll_Cliek()

(5)

End Sub


正确答案：(1)Listl.Text (2) Listl.ListCount- (3) Listl.List(i) (4) List2.Lisfindex (5) List2.Clear
(1)Listl.Text (2) Listl.ListCount- (3) Listl.List(i) (4) List2.Lisfindex (5) List2.Clear 解析：本题涉及常用的列表框技术。
列表框常用的属性如下：
ListCount列表框内的数据项个数
List(o)，List(1),... 列表框中从上到下各个数据项内容
Text列表框中当前选中的数据项内容
Listlndex列表框中当前选中的数据项的序号
列表框常用的方法如下：
AddItem列表框尾部增加一个数据项(参数给出数据项内容)
RemoveItem列表框中删除指定的数据项(参数给出待删的数据项序号)
Clear删除列表框中的全部数据项
本题中有两个列表框List1和List2，以及四个按钮。
按钮“＞”的功能是将列表框List1中选中的一个数据项复制到列表框List2的尾部。 List1中当前所选的数据项内容是List1.Text。为避免重复，在复制前，应先判断它是否已经位于List2中。List2中，已有的数据项个数为List2.ListCount。各个数据项内容为： List2．List(O)，List2．List(1)，…，因此可以用循环语句来实现这种比较。如果发现重复，则退出该过程(不再复制)。将Listl.Text复制到List2的尾部，可以用如下语句实现：
List2．Addltem Listl,Text
因此，(1)处应填写Listl.Text。
如果List1中没有选中任何数据项，则上述复制语句自动作为空语句执行。
注意，如果不修改列表框属性“MultiSelect”的默认值(O)，用户在列表框中就不能同时选择多个数据项。
按钮“＞＞”的功能是将List1中的全部数据项复制到List2中去。为避免重复，在复制前，应全部删除List2中的所有数据项。将List1中的逐个数据项：List1.List(O)， Listl．List(1)，…，逐个复制到List2中，可以用循环语句来实现。List1中的数据项个数为List1．ListCount，因此，循环次数就是List1．ListCount。循环变量i从0开始执行循环，直到Listl.ListCount-1。因此(2)处应填写Listl．ListCount-1。循环体内执行数据项复制，将Listl．List(i)增添到List2的尾部：
List2．Addltem Listl.List(i)
因此，(3)处应填写Listl.List(i)。
按钮“”的功能是将List2中当前选中的数据项删除。由于删除数据项用Removeltem方法实现，其参数为选中数据项的序号值，所以，应该用语句：
List2.RemoveltemList2.Listlndex
来实现。因此(4)处应填写List2.Listlndex。
如果List2中没有选择任何数据项(此时List2．Listlndex==1)，则上述语句会出现运
行错误。为避免这种情况发生，可以将上述语句限制在List2．Listlndex＞=O的条件下执行。
按钮“”的功能是删除List2中已经有的全部数据项，因此可以采用语句：
List2.Clear
来实现。因此，(5)处应填写List2.Clear。

第4题：

设在窗体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 Listl．Text End Sub End Sub


正确答案：C

第5题：

在窗体上绘制一个名称为List1的列表框，一个名称为Labe11的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是

A．PriVate Sub List1_Click() Labell.CaptiOn=List.ListIndex End Sub

B．PriVate Sub List1_Click() Labell.Name=listl.ListIndex End Sub

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

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


正确答案：D
解析：本题考查列表框的属性。列表框属性是历年考试重点，考生应多做相关练习。本题要注意区分ListIndex与Text属性。 ListIndex指被选中项的下标，而Text表示被选中项的内容。List1.Listlndex表示被选中的项本身，而 List1.Text表示被选中项的内容，故本题正确答案是A。同时本题还涉及Name与Caption的区别，考生也要注意区分。

第6题：

往窗体Form1上添加一个列表框控件List1，并编写如下代码： Private Sub Form_Load() For i=0T06 Listl.AddItem i Next i End Sub 为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置Listl的属性______。

A．Lial.List

B．Listl.Listlndex

C．Listl.MultiSelect

D．Listl.Text


正确答案：C
解析：Load事件是在窗体被装入工作区时触发的事件。当应用程序启动时，自动执行该事件，所以该事件通常用来在启动应用时对属性和变量进行初始化．而MouseDown、MouseUp是鼠标指针在某个对象上按键时激发的，Click是鼠标单击时激发的。

第7题：

窗体卜有Listl、List2两个列表框，Listl中有若干列表项(见图)，并有下面的程序：

Private sub Commandl_Click()

For k：Listl．ListCount_l To 0 step-1

Tf Listl．Selected(k)Then

List 2．AddItern Listl．List(k)

Listl．Removehem k

End If

Next k

End Sub

程序运行时，按照图示在List1中选中2个列表项，然后单击Command1命令按钮，则产生的结果是

A．在List2中插入了“外语”、“物理”两项

B．在Listl中删除了“外语”、“物理”两项

C．同时产生A)和B)的结果

D．把Listl中最后1个列表项删除并插入到List2中


正确答案：C
解析：For k=Listl．ListCount-1 To O Step-l／*循环倒序遍历List1中的所有内容*／If List1．selected(k)Then ／*如果被选中，那么*／
List2．Addltem Listl IJistl．List(k) ／*List2中增加选中的条目*／
List1．Removeltem k ／*把选中条目移除*／
End If ／$结束条件If*／
Next k ／*查看Ljst1中下一条目*／
所以正确的答案为c)。

第8题：

在窗体上画一个名称为Listl酌列表框，一个名称为Labell的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是：______。

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


正确答案：D
解析：List控件中Listlndex属性表示当前选中项目的索引，Text属性表示当前选中项目的内容；Label控件的Name属性表示控件的名称，Caption属性表示Label控件显示的内容。

第9题：

（ 15 ）设在窗体 Form1 上有一个列表框 List1 ，其中有若干个项目。要求单击列表框中某一项时，把该项

显示在窗体上，正确的事件过程是

A)Prvate Sub List1_Click()

Print List1.Text

End Sub

B)Private Sub Form1_Click()

Print List1.Text

End Sub

C)Private Sub List1_Click()

Print Form1.Text

End Sub

D)Private Sub Form1_Click()

List1.Print List1.Text

End Sub


正确答案：A

相关内容