首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 【应用说明】 某应用程序可选择打开用户指定的文本文件,将其内容显示在指定的文本框内供用户编辑,并将编辑后的结果保存在用户指定的文件中。运行时的窗口如图6-1所示
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 【应用说明】 某应用程序可选择打开用户指定的文本文件,将其内容显示在指定的文本框内供用户编辑,并将编辑后的结果保存在用户指定的文件中。运行时的窗口如图6-1所示
admin
2009-05-15
102
问题
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。
【应用说明】
某应用程序可选择打开用户指定的文本文件,将其内容显示在指定的文本框内供用户编辑,并将编辑后的结果保存在用户指定的文件中。运行时的窗口如图6-1所示,其中有6个标签、一个驱动器列表框、一个目录列表框、一个文件列表框、一个文件类型组合框、一个文件编辑文本框、一个文件名文本框以及两个命令按钮。
该程序的开发要求如下。
(1)通过驱动器列表框(Drivel)、目录列表框(Dirl)和文件列表框(Filel),选择文件。
(2)文件类型组合框(Cmb_type)设置为下拉式列表框,其中有三个供选项,分别为“所有文件(*.*)”、“文本文件(*.txt)”和“可执行文件(*.exe)”。在文件列表框中列出的文件类型会自动与文件类型组合框中选择的文件类型相匹配。
(3)在文件列表框中单击一个文件名时,该文件名会显示在文件名文本框 (Txt filename)中。
(4)在文件列表框中双击一个文件名时,若是文本文件,则在文件编辑文本框 (Txt file)中显示该文件的内容并可进行编辑;若不是文本文件,则弹出一个对话框,提示“请选择文本文件!”。
(5)对于编辑后的文本文件,可在文件名文本框中输入新的文件名,并单击命令按钮(Cmd save)进行保存。
【Visual Basic程序代码】
Private Sub Form_Load()
Cmb_type.Addltem "所有文件(*.*)"
Cmb_type.Addltem "文本文件(*.txt)"
Cmb_type.Addltem "可执行文件(*.exe)"
Cmb_type.ListIndex=0
Filel.Pattern="*.*": Txt_filename.Text=" "
Txt_file.Text= " "
End Sub
Private Sub Dirl Change()
Filel.Path=(1)
End Sub
Private Sub Drivel Change()
Dirl.Path=Drivel.Drive
End Sub
Private Sub Cmb_type_click()
Select Case Cmb_type.(2)
Case 0
Filel.Pattern="*.*"
Case 1
Filel.Pattern="*.txt"
Case 2
Filel.Pattern="*.exe"
End Select
End Sub
Private Sub Cmd_save_Click()
usrFile=GetFileName() ’函数GetFileName获得要保存的文件名
Open usrFile For Output As #1 ’定义usrFile为1号输出文件
Print #1,Txt file.Text ’输出到1号文件
Close #1
End Sub
Private Sub Filel_DblClick()
If right(Filel.FileName,3)<>(3)Then
MsgBox "请选择文本文件!"
Exit Sub
End If
usrFile=GetFileName() ’函数GetFileName获得要打开的文件名
Open usrFile For Input As #1 ’定义usrFile为1号输入文件
Txt_file.Text=" "
DO While (4) EOF(1)
Line Input #l,fContext ’从1号文件读入一行
Txt_file.Text;Txt file.Text +(5)+vbCrLf
Loop
Close #1
End Sub
’其他代码略
选项
答案
(1)Dir1.Path (2)ListIndex (3)"txt" (4)Not (5)fContext
解析
驱动器列表框(DriveListBox)、目录列表框(DirListBox)和文件列表框(FileListBox)是Visual Basic提供的内部控件,驱动器列表框可自动填写驱动器的名字和卷标,目录列表框可显示指定驱动器的目录树,而文件列表框则是一个特殊的ListBox控件,它显示指定目录下的所有文件,并可选择按文件的名字、扩展名或属性排列内容。
这些控件常常在一个窗体中工作,当用户在DriveListBox中选择一个驱动器时, DirListBox控件就更新显示该驱动器上的目录树,当用户在DirListBox中选择一条路径时,FileListBox控件中的内容为该目录下的文件列表,这些活动自动地触发Change事件。但是,这些活动不能自动完成,需要为Change事件编写代码,通过代码将驱动器列表框的Drive属性(指明当前驱动器)赋值给目录列表框的Path属性,将目录列表框的Path属性(指明当前路径)赋值给文件列表框的Path属性,即Dirl.Path=Drivel. Drive,Filel.Path=Dirl.Path,因此,空(1)处应填入“Dirl.Path”。
下拉式列表框(Combo Box)是组合列表框和文本框的特性而成的控件。它的Text属性值是用户所选择的项目的文本或直接从编辑区输入的文本。它的ListIndex属性值为选中条目的编号。显然,对于文件类型组合框Cmb_type的单击事件,空(2)处应填入“ListIndex”。
空(3)所在的if语句通过后缀判断文件的类型,显然对于文本文件,空(3)处应填入“txt”。由于文件的大小是变化的,因此对文件进行读取操作时,条件是文件未到达结尾,一般程序语言都会提供对文件操作的命令或函数,因此,空(3)处应填入“Not”。若要将文本文件的内容显示在文本框Txt_file中,则需把从1号文件读入的各行文本连接起来,语句“LineInput#1,fContext”用于从1号文件读入一行文本并存入变量fContext。因此,空(5)处应填入“fContext”。
转载请注明原文地址:https://kaotiyun.com/show/LIjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
在Word2007文档编辑时,使用(39)________________选项卡中的“分隔符”命令,可以在文档中指定位置强行分页。
某地区对高二学生举行了一次数学统考,并按“成绩-人数”绘制了分布曲线。考试成绩呈(12)________________,分布比较合理。
Windows7中的文件命名规则不包括________________。
个人计算机上的usB接口通常并不用于连接________________。
在实施项目过程中,信息处理员小王在“时间T-项目剩余工作量R”平面坐标系上动态地记录了项目实施进度,并与计划进度做了对比。在项目实施中途,从图上可以看出该项目()。
假设在Access中已经建立了“学生”表,表中包括“学号”、“姓名”、“性别”和“班级”等字段,如果要统计出每个班级的人数,那么在查询设计视图的“班级”的“总计”行和“学号”的“总计”行中应分别选择(65)。
由国家机关下达任务开发的软件,若在项目任务书或者合同中对软件著作权未作明确规定的,其软件著作权由(21)享有。
假设100个数据的平均值为82.31,其中有10个数据又发生了如下增减变化:+3.52,+2.87,-4.13,+5.34,-2.87,+2.50,-3.52,+4.23,-5.04,+0.10,则新的平均值变为(26)。
假设安装了Word的公式编辑器,要在Word文档中编辑出这个公式,正确的操作步骤是(46)。
随机试题
男青年腰椎骨折后走路正常,大、小便失禁,应考虑
输卵管妊娠时判断胚胎死亡的可靠依据是
下列关于再生障碍性贫血的检查结果,错误的是
环甲膜切开术后插管时间最长不宜超过
某果汁加工厂为增值税一般纳税人,2013年8月,外购的一批免税农产品因管理不善全部毁损,账面成本22620元,外购库存的一批包装物因发生自然灾害全部毁损,账面成本32000元,农产品和包装物的进项税额均已抵扣,该加工厂2013年8月应转出进项税额(
下列关于继子女的遗产继承权,说法不正确的是()。
ABadIdeaThinkyoucanwalk,drive,takephonecalls,e-mailandlistentomusicatthesametime?Well,NewYork’snewla
fearofpoverty
Silenceisunnaturaltoman.Hebeginslifewithacryandendsitinstillness.Intheintervalhedoesallhecantomakeano
Hestudiedthemapcarefully,tryingto______thenearestroutetothebeach.
最新回复
(
0
)