首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在窗体上有一个名为Listl的列表框,列表框中有若干列表项,如图40—6所示,通过属性窗口设置列表框的MultiSelect属性值为1,一个名为Textl的文本框,还有两个命
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在窗体上有一个名为Listl的列表框,列表框中有若干列表项,如图40—6所示,通过属性窗口设置列表框的MultiSelect属性值为1,一个名为Textl的文本框,还有两个命
admin
2009-03-26
23
问题
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在窗体上有一个名为Listl的列表框,列表框中有若干列表项,如图40—6所示,通过属性窗口设置列表框的MultiSelect属性值为1,一个名为Textl的文本框,还有两个命令按钮,名称分别是Commandl和Command2,标题分别是“全选”和“存盘”。要求在程序运行时,单击commandl按钮则将Listl中的全部列表项选中,然后单击Command2按钮,将Listl中的全部列表项写入Textl中,并写入文本文件out.txt中,并将out.txt保存在考生文件夹下。
注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
选项
答案
本题主要考查列表框的使用。列表框用于在很多项目中作出选择的操作。列表框的ListCount属性表示表项的数量,列表项的排列从0开始,最后一项的序号为ListCount-1。使用列表项的Selected属性来表示列表框中哪些项被选中,该属性实际上是一个数组,各元素与列表框中的一项相对应,其取值为True或False,为True时表示选择了该项,为False表示未选择。 根据题意,将两个命令按钮、一个列表框控件和一个文本框控件添加到窗体中,命令按钮的名称分别为Commandl和Cornmand2、Caption属性分别为“全选”和“存盘”,列表框的名称为Listl,文本框的名称为Textl。补充后的具体代码如下: Private Sub Commandl Click() Dim i As Integer Dim str As String str="" For i=0 To Listl.ListCount-1 Listl.
Selected(i)
=True’将所有的列表项都选中 str=str+Listl.List(i) ’将选中的文本写入一个变量里面,最后一起输出 Next i Textl.
Text
=str End Sub Private Sub Command2 Click() Open App.Path&"\Out.txt"For
Output
As#1 ’打开文件 Dim i As Integer For i=0 T0 Listl.ListCount-1
Print
#1,Listl.List(i) ’将每一项都写入到文件中 Next i Close#1 End Sub Private Sub Form Load() Listl.
AddItem
"足球" ’向列表中添加选项 Listl.
AddItem
"篮球" Listl.
Addltem
"排球" End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/FV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在下列排序方法中,平均时间性能为O(nlog2n)且空间性能最好的是()。
Java语言支持【】协议,从而使得Java程序在分布式环境中能够很方便地访问处于不同地点的对象。
下列关于栈的描述中错误的是()。
执行下面的程序段后,x的值为()。publicclassSun{publicstaticvoidmain(Stringargs[]){intx=5;for(int
下列组件不能添加进Frame主窗口的是
软件设计模块化的目的是【】。
Applet可以做下列哪些操作()
用鼠标点击菜单项(Menultem)产生的事件是()。
使得线程放弃当前分得的CPU时间,但不使线程阻塞,即线程仍处于可执行状态,随时可能再次分得CPU时间的方法是【】。
下面的程序是列出目录C:\Test中所有的.txt文件,请将程序补充完整。importjava.io.*;//引入java.io包中所有的类publicclassFileFilterTest{publicstati
随机试题
甲将汽车借给乙,乙驾车时发生交通事故,致使丙受伤。经事故责任认定,乙应负全责。丙的损害应由()
男性,20岁,近期发现有贫血,无自觉症状。体检:面色不佳,脾肋下3cm。检验:血红蛋白80g/L;红细胞渗透脆性降低,其母有贫血史。根据以上情况,你考虑下列哪项检查最为重要
下列关于喷墨打印技术的叙述不正确的是
患儿,5岁。证见发热烦躁,咳嗽喘促,气急鼻煽,呼吸困难,喉问痰鸣,面赤口渴,大便干燥,小便黄少,舌红,苔黄,脉滑数。其证候是( )
当参加验收各方对工程质量验收意见不一致时,可请()协调处理。
同辈群体是社会工作专业服务的对象,同时也是可以利用的助人要素。关于同辈群体的说法,正确的是()。
闻一多在《诗的格律》中提出了“三美”主张,不包括()。
[*]
Whyisthestudyimportanttohuman?
Oneinsix.Believeitornot,that’sthenumberofAmericanswhostrugglewithhunger.Tomaketomorrowalittlebetter,Feedi
最新回复
(
0
)