首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项,如图3-138(a)所示,单击“选中”按钮则把选中的项目移到List2中;单击“显示”按钮,则在Text1
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项,如图3-138(a)所示,单击“选中”按钮则把选中的项目移到List2中;单击“显示”按钮,则在Text1
admin
2016-01-31
58
问题
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项,如图3-138(a)所示,单击“选中”按钮则把选中的项目移到List2中;单击“显示”按钮,则在Text1文本框中显示这些选中的城市,如图3-138(b)所示。已经给出了所有控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
审题分析 在“选中”按钮的单击事件中,由List1的最后一项依次向前进行遍历判断是否被选中,最后一项的索引值是ListCount-1,第一项的索引值是0,所以应该是反向循环,步长为-1;在循环体中如果该项被选中,则将其加入List2中,同时在List1中删除这一项。 在“显示”按钮的单击事件中,通过一个For循环依次取出List2中的每一项并将其连接到Text1中。 操作步骤 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: For k=List1.ListCount-1 To 0 Step-1 List2.AddItem List1.List(k) List1.RemoveItem k Text1=Text1 & " " & List2.Li8t(k) 步骤2:按要求将文件保存至考生文件夹中。 考点链接 For循环结构、选择控件。
解析
转载请注明原文地址:https://kaotiyun.com/show/5uLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
文本框TextBox中的内容若要设置为用户不能修改,应设置()属性。
Sub过程与Function过程最根本的区别是
数据库管理系统常见的数据模型有层次模型、网状模型和______3种。
下列说法不正确的是()。
在程序运行期间,当滚动条的滑块被拖动时,则立即触发滚动条的()事件。
要获得文件列表框中当前被选中的文件的文件名,则应使用哪个属性______。
数据结构中,与所使用的计算机无关的是数据的______。
在窗体(Name属性为Forml)上面添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程:PrivateSubCommandl_Click()a=Tex
与键盘操作有关的事件有KeyPress、KeyUp和KeyDown事件,当用户按下并且释放一个键后,这三个事件发生的顺序是()。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于______的联系。
随机试题
筒内盛装着碳酸氢钠与发泡剂的混合液的灭火器是()。
属于肿瘤相关抗原的分子是()
A.1年B.2年C.3年D.4年根据《麻醉药品和精神药品管理条例》的有关规定麻醉药品、第一类精神药品邮寄证明应保存()。
如图所示,某砖混住宅条形基础,地层为粘粒含量小于10%的均质粉土,重度19kN/m3,施工前用深层载荷试验实测基底标高处的地基承载力特征值为350kPa,已知上部结构传至基础顶面的竖向力为260kN/m,基础和台阶上土平均重度为20kN/m3,按现行《建筑
下列选项中,属于后向一体化的是()。
对来文的办理情况进行催促的公文处理程序称为()。
国家发改委有关官员表示,未来的居民用电价格改革将充分考虑广大百姓利益。这充分体现出()。①我国政府坚持为人民服务的工作态度②我国坚持人民代表大会制度③我国政府坚持对人民负责的基本原则④我国政府的宗旨是为人民服务
(1)勤学苦练(2)受父母熏陶(3)获全国“少年组”第一名(4)不断进步(5)出生于书画世家
玫瑰:爱情
"IamgeneralmanageroftherecentlyestablishedBritishdivisionofasmallCanadianwholesalecompany.Mytaskistosetupt
最新回复
(
0
)