首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1_Click() Dim n%,
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1_Click() Dim n%,
admin
2018-07-11
78
问题
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:
Private Sub Command1_Click()
Dim n%,k%
n=Len(Text1.Text)
For k=0To List1.ListCount-1
If Lett(List1.List(k),n)=Text1.Text Then
List1.RemoveItem k
End If
Next k
End Sub
在调试时发现,如输入“陈”,可以正确删除所有姓“陈”的项目,但输入“刘”,则只删除了“刘邦”、“刘备”2项,结果如图2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把For k=0To List1.ListCount-1改为( )。
选项
A、For k=1To List1.ListCount-1
B、For k=1To List1.ListCount
C、For k=0To List1.ListCount
D、For k=List1.ListCount-1To0Step-1
答案
D
解析
在程序运行时删除列表框中的项目可以使用RemoveItem方法,其语法为:列表框.RemoveItem索引号,列表枢的属性ListIndex返回当前所选项目的索引号,凶此删除列表框选中项目的语句为:List1.RemoveItem List1.ListIndex。列表框的List(Index)属性返回指定索引号的列表项内容,第一个列表项的索引为0而最后一个项目的索引为ListCount-1,其中,ListCount属性返回列表框中当前的列表项总数。
本题原代码错误原因:每执行一次RemoveItem方法后,列表框中被删除项目的后续项目的位置将前移,即其ListIndex属性值将减1。为此可从列表框的最后一个项目开始进行查找,即:For。k=List1.ListCount-1 To 0 Step-1。
转载请注明原文地址:https://kaotiyun.com/show/iOGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Forml,标题为“测试”的窗体上添加一个名称为Framel、标题为“字体”的框架。在框架内再添加两个名称分别为Optl和Opt2、标题分别为“隶书”和“宋体”的单选按钮。程序运行后的窗体如图所示。注意:存盘时必须存放在考生文件夹下,
窗体上有Commandl、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommandl_Click()m=Input
数据库应用系统中的核心问题是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp,程序的功能是,在运行时,如果选中一个或两个复选框和一个单选按钮,则对文本框中的文本内容做相应的设置,如图所示。窗体上的控件已经给出,但没有给出主要程序内容,请编写适当的事件过程,完成上述功能。
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Textl中,若编写如下事件过程:PrivateSubCommand1Click()Dima&,s&.k&s=la=2Fork
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml,标题为“控件数组”的窗体上,添加1个名称为Cmdl的控件数组,该控什数组由三个命令按钮组成,其标题分别是“插入”、“删除”、“更新”,索引号分别为0、
执行以下程序段:a$=“VisualBasicProgramming”b$:“C++”c$=UCase(Left$(a$,7))&b$&Right$(a$,12)后,变量c$的值为()。
在考生文件夹下有一个工程文件Sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图1所示),单击“打开”按钮,则把文件中的内容读入
下面不能作为结构化方法软件需求分析工具的是
某二叉树中共有935个结点,其中叶子结点有435个,则该二叉树中度为2的结点个数为
随机试题
Forthispart,youaresupposedtowriteacompositionofabout100-120wordsbasedonthefollowingsituation.Remembertowri
()是指旅行社所设计的旅游产品,必须具有交通上的便利,使购买该产品的旅游者能够容易地进入和离开旅游目的地或旅游景点。
这里的门窗都为木质,有的粗糙一些,有的很精致,尤其是窗子,雕成各种图案,有菱形、圆形、方形。还有其他各种形状,各具特色。从这段话中可以看出()。
根据下列资料,回答问题。2011年,国土资源系统进一步完善“全国覆盖、全程监管、科技支撑、执法督察、社会监督”的执法监管体系。全年发现违法用地行为7.0万件,涉及土地5.0万公顷(耕地1.8万公顷),同比分别上升5.8%、11.0%(耕地下降2.
【材料一】“总有一天,到那时……所有的欧洲国家,无须丢掉你们各自的特点和闪光的个性,都将紧紧地融合在一个高一级的整体里;到那时,你们将构筑欧洲的友爱关系……”——维克多.雨果【材料二】欧洲联盟(简称欧盟,Eu
Flash存储芯片AM29LV160的外部地址线共20条(A0~A19),数据线共16条(DQ0~DQ15),由此计算AM29LV160的存储容量V=【61】Mbits,或表示为【62】MB。
执行下列语句:#include<iostream>usingnamespacestd;intmain(){intx=3;if(x=5)cout<<x++<<endl;e
PublicRelationsPublicrelationsisabroadsetofplannedcommunicationsaboutthecompany,includingpublicityreleases,
LatelyIgotachancetoreadPeoplemagazine’smostrecentcompilationof"The50MostBeautifulPeopleintheWorld."Itwas
William’sChineseis_______thanhisbrotherEdward’s.
最新回复
(
0
)