首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1_Click() Dim n
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1_Click() Dim n
admin
2017-08-22
90
问题
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:
Private Sub Command1_Click()
Dim n%.k%
n=Len(Text1.Text)
For k=0 To List1.ListCount-1
If Lefl(List1.List(k),n)=Text1.Text Then
List1.Removeltem k
End If
Next k
End Sub
在调试时发现,如输入“陈”,可以正确删除所有姓“陈”的项目,但输入“刘”,则只删除了“刘邦”、“刘备”2项,结果如图2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把For k=0 To List1.ListCount-1改为( )。
选项
A、For k=1 To List1.ListCount-1
B、For k=1 To List1.ListCount
C、For k=0 To List1.ListCount
D、For k=List1.ListCount-1 To 0 Step-1
答案
D
解析
在程序运行时删除列表框中的项目可以使用Removeltem方法,其语法为:列表框.Removeltem索引号,列表框的属性IAstlndex返回当前所选项目的索引号,因此删除列表框选中项目的语句为:IAstl.Removeltem List1.IAstlndex。列表框的List(Index)属性返回指定索引号的列表项内容,第一个列表项的索引为0而最后一个项目的索引为ListCount-1,其中,ListCount属性返回列表框中当前的列表项总数。
本题原代码错误原因:每执行一次RemoveItem方法后,列表框中被删除项目的后续项目的位置将前移,即其ListIndex属性值将减1。为此可从列表框的最后一个项目开始进行查找,即:Fork=List1.ListCount-1 To 0 Step-1。
转载请注明原文地址:https://kaotiyun.com/show/RtGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()Text1.Text="Visual"
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:FunctionM(xAsInteger,yAsInteger)M=пf(x>y,x,y)EndFunctionPrivateSub
如果要通过程序代码来一次性删除列表框中所有项目,则应使用的方法是______。
假定有一个文本框,其名称为Text1,为了使该文本框具有焦点,应执行的语句是______。
设有数组定义语句:Dima(5)AsInteger,List1为列表框控件。下列给数组元素赋值的语句错误的是
软件开发的结构化生命周期方法将软件生命周期划分成______。
数据库保护分为:安全性控制、【】、并发性控制和数据的恢复。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml标题为”选课”的窗体上画一个复选框数组,名称为CHl,共有四个复选框,按顺序其标题分别是”数学”、”语文”、”外语”、”计算机”,其中”语文”、”计算机”复选
对于循环队列,下列叙述中正确的是()。
随机试题
症见手足厥寒,口不渴,或腰、股、腿、足疼痛,舌淡苔白,脉沉细或细而欲绝。宜选用
如果磁共振图像的矩阵为128×128,则进行空间定位时进行相位编码的次数为
牙釉质发育不全镜下所见哪项正确
对于生产注射液所使用的滤过器错误表述是( )。
属于长期备用医嘱的是
“十二五”时期坚持把改革开放作为加快转变经济发展方式的()。
陷入时刻偏执于思考“我是什么人”、“我该怎么做”的犹豫中,被束缚于其中不能自拔而失去自我,这是()的表现。
简述学习策略与学习方法的异同。
党在过渡时期的总路线和总任务是
Aftertryingtomollify(平息)itscriticsinrecentyearsbyofferingbetterhealthcarebenefitstoitsemployees,Wal-Martissub
最新回复
(
0
)