首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:Private Sub Command1_Click() Dim n%
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:Private Sub Command1_Click() Dim n%
admin
2020-06-30
96
问题
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:Private Sub Command1_Click()
Dim n%,k%
n=Len(Text1.Text)
For k=0 To Listl.ListCount-1
If Left(List1.List(k),n)=Text1.Text Then
List1.RemoveItem k
End If
Next k
End Sub
在调试时发现,如输入"陈",可以正确删除所有姓"陈"的项目,但输入"刘",则只删除了"刘邦"、"刘备"2项,结果如图2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把For k=0 To List1.ListCount-1改为( )。
选项
A、For k=List1.ListCount-1 To 0 Step-1
B、For k=0 To List1.ListCount
C、For k=1 To List1.ListCount-1
D、For k=1 To List1.ListCount
答案
A
解析
错误原因:每一次删除列表框满足项,列表框的项目数目就会相应地减少,所以就出现了漏删内容,如果把循环变量k改成从List1.ListCout-1到0,从最后一个项目往第一个项目查找,满足条件就删除该项目,从而不会出现遗漏现象,所以正确答案为A。
转载请注明原文地址:https://kaotiyun.com/show/gmHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于通用对话框的叙述中,错误的是( )。
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3.77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图所示),即
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger n=2 Form=1To3 Printproc(n); NextmEndSubF
下列叙述中正确的是()。
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
结构化程序所要求的基本结构不包括()。
下列关于菜单项的描述中,错误的是
在最坏情况下,堆排序的时间复杂度是
假定在图片框Picturel中装入了一个图片,在程序运行中,为了清除该图片(注意,清除图片,而不是删除图片框),应采用的正确方法是
随机试题
在管道的流体流动中,减小阻力可以增加过流流量。下述减少阻力的措施中,错误的是()。
简述我国税收优先权适用的情形。
与肾性高血压有关的致血压升高的生理活性物质有
下列有关会计师事务所获取独立性书面确认函的说法中,正确的有()。
“虽然物质上我很贫穷,但精神上我很富有。我会将这份爱心公益事业一直做下去,一直到我老去的那天。”被称为“活雷锋”的殷仁俊不仅是这样说的.也是这样做的.25年来他为30多万上海老人免费理发。殷仁俊的言行表明()。①正确的价值观对人具有积极导向作用②价
(2012年真题)下列选项中,属于法律意识的范畴的有
It’smoredifficulttosolveaproblemthan______
U.S.presidentsnormallyservea(n)_____term.
What’stheproblemtheworldisnowfacing?Theworldisnotonlyhungrybutitisalsothirstyfor______.
There’snothingliketheinstinctiveroarofthecrowdwhenthousandsofpeopleallsing,orshouttogether.Buttranslatingtha
最新回复
(
0
)