首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1 Click( )
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1 Click( )
admin
2018-09-29
52
问题
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:
Private Sub Command1 Click( )
Dim n%,k%
n=Len(Text1.Text)
For k=0 To List1.ListCount-1
If Left(List1.List(k),n)=Text1.Text Then
List1.Removeltem k
EndIf
Nextk
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.ListCotmt
D、For k=List1.ListCount-1 To 0 Step-1
答案
D
解析
在程序运行时删除列表框中的项目可以使用Removeltem方法,其语法为:列表框.Removeltem索引号,列表框的属性Listlndex返回当前所选项目的索引号,因此删除列表框选中项目的语句为:List1.RemoveItem List1.ListIndex。列表框的List(Index)属性返回指定索引号的列表项内容,第一个列表项的索引为0而最后一个项骨的索引为ListCount-1,其中,ListCount属性返回列表框中当前的列表项总数。
本题原代码错误原因;每执行一次RemoveItem方法后,列表框中被删除项目的后续项目的位置将前移,即其ListIndex属性值将减1。为此可从列表框的最后一个项目开始进行查找,即:Fork=List1.ListCount-1 To 0 Step-1。
转载请注明原文地址:https://kaotiyun.com/show/wQFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimI,Num Randomize Do ForI=1To1000 Num=Int(Rnd*
设:a=12,b=5,c=7,表达式x=(a\c+aModb)+Int(13/5)的值是( )。
(1)在名称为Form1的窗体上添加两个标签(名称分别为Labell和Label2,标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2,初始文本均为空)和一个命令按钮(名称为Command1,标题为“输入”)。然后编写命令按钮的C
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dimn()AsIntegerDima,bAsIntegera=Inpu
为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为( )。
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。
(1)考生文件夹下的工程文件Bjt3.vbp中有一个初始文本为空且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请添加—个标题为“查找结果”的标签Labell,再添加一个名称为Te
有一种控件,可以在其中承载其他控件,还可以在其中用Print方法输出文本,这种控件是
下列符号常量的声明中,不合法的是
检查软件产品是否符合需求定义的过程称为()。
随机试题
(2011年第152题)胆汁在消化和吸收营养物质中的作用有
患儿女,胎龄34周。早产儿,家长来儿童保健门诊咨询应于何时开始给予铁剂以预防缺铁性贫血,护士回答正确的是
许某与汤某系夫妻,婚后许某精神失常。二人提出离婚,某县民政局准予离婚。许某之兄认为许某为无民事行为能力人,县民政局准予离婚行为违法,遂提起行政诉讼。县民政局向法院提交了县医院对许某作出的间歇性精神病的鉴定结论。许某之兄申请法院重新进行鉴定。下列哪些选项是正
(),建设部制定了《城市房屋拆迁估价指导意见》,使得拆迁估价问题有了参考依据。
招标的主体可以是( )。
镜泊湖、长白山天池、云南滇池从成因上分类,属于()。
铁路运输中整列运输的费用比整车运输要高些。
北京2022年冬奥会和冬残奥会主题口号是()。
某学校初中二年级五班的物理老师要求学生两人一组制作一份物理课件。小曾与小张自愿组合,他们制作完成的第一章后三节内容见文档“第3-5节.pptx”,前两节内容存放在文本文件“第1-2节.pptx”中。小张需要按下列要求完成课件的整合制作:为幻灯片设置适
Whatattractscustomers?Obviouslythequalityofaproductdoes,butvisualimages【C1】______agreatdeal.Itisnotonlytheima
最新回复
(
0
)