首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下应用说明以及用Visual Basic开发过程中所编写的程序代码。 [应用说明] 某应用程序在运行过程中的一个界面如下图所示: 在“供选课程”列表框(名为Listl)中选择某个课程后,再单击“,”按钮(名称为cmdSele
阅读以下应用说明以及用Visual Basic开发过程中所编写的程序代码。 [应用说明] 某应用程序在运行过程中的一个界面如下图所示: 在“供选课程”列表框(名为Listl)中选择某个课程后,再单击“,”按钮(名称为cmdSele
admin
2008-05-10
50
问题
阅读以下应用说明以及用Visual Basic开发过程中所编写的程序代码。
[应用说明]
某应用程序在运行过程中的一个界面如下图所示:
在“供选课程”列表框(名为Listl)中选择某个课程后,再单击“,”按钮(名称为cmdSelect),就能将该课程复制到“所选课程”列表框(名称为List2)中(但要注意不要出现重复项):如果单击“>>”按钮(名称为cmdSelAll),就能将全部供选课程名复制到列表框List2中(注意应先删除List2中的已选项);如果在“所选课程”列表框中选中某个课程,再单击“<”按钮(名称为emdDelete),就会从List2中删除该课程(未选课程时应不做处理);如果单击“<<”按钮(名称为cmdDelAll),就会从List2中删除所有已选课程。
[Vsual Basic 程序代码]
Private Sub CmdSelect_Cliek()
For i = O To List2.ListCount - 1
If Listl.Text = List2.List(i) Then Exit Sub ’不要重复选择
Next i
List2.Addltem (1) ’在List2中增添List1中所选的项
End Sub
Private Sub CrndSelAll_Click()
List2.Clear ’先删除List2中的已有项
For i = 0 To (2) ’对List1中所有各项做循环处理
List2.Addltem (3) ’将该项增添到 List2中
Next i
End Sub
Private Sub CmdDelete_Cliek()
If List2.Listlndex >= O Then ’如果List2中有选中的项,
List2.Removeltem (4) ’则删除所选的项
End If
End Sub
Private Sub CmdDelAll_Cliek()
(5)
End Sub
选项
答案
(1)Listl.Text (2) Listl.ListCount- (3) Listl.List(i) (4) List2.Lisfindex (5) List2.Clear
解析
本题涉及常用的列表框技术。
列表框常用的属性如下:
ListCount 列表框内的数据项个数
List(o),List(1),... 列表框中从上到下各个数据项内容
Text 列表框中当前选中的数据项内容
Listlndex 列表框中当前选中的数据项的序号
列表框常用的方法如下:
AddItem 列表框尾部增加一个数据项(参数给出数据项内容)
RemoveItem 列表框中删除指定的数据项(参数给出待删的数据项序号)
Clear 删除列表框中的全部数据项
本题中有两个列表框List1和List2,以及四个按钮。
按钮“>”的功能是将列表框List1中选中的一个数据项复制到列表框List2的尾部。 List1中当前所选的数据项内容是List1.Text。为避免重复,在复制前,应先判断它是否已经位于List2中。List2中,已有的数据项个数为List2.ListCount。各个数据项内容为: List2.List(O),List2.List(1),…,因此可以用循环语句来实现这种比较。如果发现重复,则退出该过程(不再复制)。将Listl.Text复制到List2的尾部,可以用如下语句实现:
List2.Addltem Listl,Text
因此,(1)处应填写Listl.Text。
如果List1中没有选中任何数据项,则上述复制语句自动作为空语句执行。
注意,如果不修改列表框属性“MultiSelect”的默认值(O),用户在列表框中就不能同时选择多个数据项。
按钮“>>”的功能是将List1中的全部数据项复制到List2中去。为避免重复,在复制前,应全部删除List2中的所有数据项。将List1中的逐个数据项:List1.List(O), Listl.List(1),…,逐个复制到List2中,可以用循环语句来实现。List1中的数据项个数为List1.ListCount,因此,循环次数就是List1.ListCount。循环变量i从0开始执行循环,直到Listl.ListCount-1。因此(2)处应填写Listl.ListCount-1。循环体内执行数据项复制,将Listl.List(i)增添到List2的尾部:
List2.Addltem Listl.List(i)
因此,(3)处应填写Listl.List(i)。
按钮“<”的功能是将List2中当前选中的数据项删除。由于删除数据项用Removeltem方法实现,其参数为选中数据项的序号值,所以,应该用语句:
List2.Removeltem List2.Listlndex
来实现。因此(4)处应填写List2.Listlndex。
如果List2中没有选择任何数据项(此时List2.Listlndex==1),则上述语句会出现运
行错误。为避免这种情况发生,可以将上述语句限制在List2.Listlndex>=O的条件下执行。
按钮“<<”的功能是删除List2中已经有的全部数据项,因此可以采用语句:
List2.Clear
来实现。因此,(5)处应填写List2.Clear。
转载请注明原文地址:https://kaotiyun.com/show/1sjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
在Excel中,C3:C7单元格中的值分别为10、OK、20、YES和48,在D7单元格中输入函数“=COUNT(C3:C7)”,按回车键后,D7单元格中显示的值为______。
当个人计算机以拨号方式接入互联网时,必须使用的设备是(9)。
某企业准备将3项工作A、B、C分配给甲、乙、丙三人,每人分别做一项。估计各人完成各项工作所需的天数如下表所示:为使完成这三项工作所需的总天数最少,应选最优的分配方案。在最优分配方案中,(69)。
数据源有多种,从传感器、智能仪表自动发送过来的数据属于______。
数据处理技术员小王为了本企业的利益做了如下几项数据处理,其中________是违法的。
某年级有甲乙两班,在最近举行的全年级数学考试中,甲班平均成绩为P,乙班平均成绩为Q,甲班人数占全年级的比例为α,则全年级的平均成绩为()。
结构化程序中的基本结构不包括(28)。
在Excel2010中,若要计算出B3:E6区域内的数据的最大值并保存在B7单元格中,应在B7单元格中输入________________。
某班级有40名学生,本次数学考试大多在80分上下。老师为了快速统计平均分,对每个学生的分数按80分为基准,记录其相对分(多出的分值用正数表示,减少的分值用负数表示,恰巧等于80分时用0表示),再统计出各种相对分的人数,如下表:根据上表可推算出,这次考试
某年级两个班举行了一次数学统考,一班(共30人)的平均成绩为70分,二班(共 20人)的平均成绩为75分,则该年级的平均成绩为(65)分。
随机试题
实际教学中,有的教师对学生作业采用“漏一补十”“错一罚十”的做法。针对这一做法,下列陈述正确的是()
某总体含有n个个体,现测得n个个体某定量指标的数值,即可求得总体均数值与总体标准差,计算总体标准差时,其自由度应该是
碘酚主要用于治疗()
一般地讲,同一块土地用于商业、住宅和工业时的地价()。
在工地及附近区域,由于疏忽或者过失造成第三者的人身伤亡,依法应当承担的经济赔偿责任,属于( )。
A企业为禽类加工企业,有员工415人,厂房占地15000m2,包括一车间、二车间、冷冻库、冷藏库、液氨车间、配电室等生产单元和办公区。液氨车间为独立厂房,其余生产单元位于一个连体厂房内。连体厂房房顶距地面12m,采用彩钢板内喷聚氨酯泡沫材料;吊顶距房顶2.
根据企业所得税法律制度的规定,下列关于所得来源地的确定,表述正确的有()。
四书为《大学》、《中庸》、《论语》、《春秋》的合称。
①农民工是_______国家现代化建设的重要力量,为促进经济社会发展做出了巨大贡献。②美国天文学家最近_______到一个距离地球约132亿光年的星系,这是迄今已知距离地球最遥远的星系。③有了二粒小麦的基因组图谱,科学家们能更加方便地_______出高
在考生文件夹下打开文档Excel.xlsx【背景素材】财务部助理小王需要向主管汇报2013年度公司差旅报销情况,现在请按照如下需求,在Excel.xlsx文档中完成工作:使用公式统计每个活动地点所在的省份或直辖市,并将其填写在地区列所对应的单元格中
最新回复
(
0
)