首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 在考生文件夹下有工程文件sjt5.vbp及窗体文件sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他部分。存盘时不
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 在考生文件夹下有工程文件sjt5.vbp及窗体文件sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他部分。存盘时不
admin
2009-02-25
41
问题
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。
在考生文件夹下有工程文件sjt5.vbp及窗体文件sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
本题描述如下:
在窗体上有一个名为L1的列表框,列表框中有若干的列表项如图11-7所示,通过属性窗口设置列表框的MultiSelect属性为1。还有两个命令按钮,名称分别是 C1和C2,标题分别是“全选”和“存盘”。要求在程序运行时,点击C1按钮则将 L1中的全部列表项选中,然后点击C2按钮,将L1中的全部列表项写入文本文件 out7.txt中,并将out7.txt保存在考生文件夹下。
选项
答案
列表框用于在很多项目中作出选择的操作。列表框的ListCount属性表示表项的数量,列表项的排列从0开始,最后一项的序号为ListCount-1。使用列表项的Selected属性来表示列表框中哪些项被选中,该属性实际上是一个数组,各元素与列表框中的一项相对应,其取值为True或False,为True时表示选择了该项,为False表示未选择。解题步骤: 第一步:编写程序代码。 程序提供的代码: Private Sub C1_Click() Dim i As Integer For i=0 TO L1.LiStCount-1 ’L1.?=True Next End Sub Private Sub C2_Click() Dim i As Integer Open "out7.txt" For Output As #1 For i=0 To L1.ListCount-1 ’ L1.ListIndex= ’ Print #1, L1.?, L1.Selected(i)=False Next Close #1 End Sub 参考代码: Private Sub C1_Click() Dim i As Integer For i=0 To L1.ListCount-1 L1.Selected(i)=True Next End Sub Private Sub C2_Click() Dim i As Integer Open "out7.txt" For Output As #1 For i=0 To L1.ListCount-1 L1.ListIndex=i Print #1, L1.Text, L1.Selected(i)=False Next Close #1 End Sub 第二步:调试并运行程序 第三步:按题目要求存盘
解析
转载请注明原文地址:https://www.kaotiyun.com/show/Rh1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Java程序的执行过程中用到一套JDK工具,其中jbD.exe是指()。
在JavaApplet程序中,如果对发生的事件做出响应和处理的时候,应该使用下列哪个语句
对于下面语句的说法,不正确的是ThreadthrObj=newThread();
程序设计方法要求在程序设计过程中
创建一个10行40列的文本区域tal的正确语句是【】。
下面的程序执行后,屏幕上显示的应是【】。publicclassExam{publicstaticvoidmain(String[])args){charchar1[]={’1’,’2’,’3
运行下列程序,会产生什么结果?()publicclassXexlendsThreadimplementsRunable{publicvoidrun(){System.out.println
下面说法不正确的是()
创建一个显示“选项”的菜单项对象mi的正确语句是【13】。
随机试题
患者,女,67岁。肢体颤动,不能自制,心情紧张时加重,伴肢体麻木,眩晕耳鸣,面赤烦躁,易激动,口苦而干,尿赤,大便干,舌质红,苔黄,脉弦。其辨证为
治疗破伤风时,注射大量TAT的目的是()。
生成原尿的有效滤过压等于
设有事件A和B,已知P(A)=0.8,P(B)=0.7,且P(A|B)=0.8,则下列结论中正确的是()。
下列不是索赔成立的条件的是()
抓斗式挖泥船开挖硬塑黏土时宜选用()。
背景A公司以EPC交钥匙总承包模式中标非洲北部某国一机电工程项目,中标价2.5亿美元,合同约定总工期36个月,支付币种为美元。设备全套由中国制造,所有技术标准、规范全部执行中国标准和规范。工程进度款每月10日前按上月实际完成量支付,竣工验收后全部
帕格尼尼一生中创作了吉他曲()首。
我国农村要长期稳定以家庭承包经营为基础、统分结合的双层经营体制,其关键和基础是()。
要使得在“应用程序生成器”中所做修改与当前活动项目保持一致,应单击【】按钮。
最新回复
(
0
)