首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 【应用说明】 某应用程序可选择打开用户指定的文本文件,将其内容显示在指定的文本框内供用户编辑,并将编辑后的结果保存在用户指定的文件中。运行时的窗口如图6-1所示
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 【应用说明】 某应用程序可选择打开用户指定的文本文件,将其内容显示在指定的文本框内供用户编辑,并将编辑后的结果保存在用户指定的文件中。运行时的窗口如图6-1所示
admin
2009-05-15
72
问题
阅读以下应用说明及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
程序员下午应用技术考试
软考初级
相关试题推荐
人工智能(AI)时代,人类面临许多新的安全威胁。以下(60)________________不属于安全问题。
以下文件类型中,(19)________________表示视频文件。
许多企业常把大量暂时不用的过期数据分类归档转存于(8)________________中。
n=1,2,3,…,100时,[n/3]共有(4)________________个不同的数([a]表示a的整数部分,例如[3.14]=3)。
以下关于数据处理的叙述中,不正确的是(1)________________。
个人计算机上的usB接口通常并不用于连接________________。
在收集、整理、存储大数据时,删除重复数据的作用不包括________________。
为支持各级管理决策,信息处理部门提供的数据不能过于简化,也不能过于繁琐,不要提供大量不相关的数据。这是信息处理的()要求。
在Excel2007中,在单元格A1中输入函数“=POWER(2,3)/MAX(1,2,4)”,按回车键后,则A1单元格中的值为__________。
内存用于存放计算机运行时的指令、程序、需处理的数据和运行结果。但是,存储在(2)中的内容是不能用指令修改的。
随机试题
哪两脏的关系主要表现在气机调节方面?()
A、 B、 C、 D、 C
Asubjectwhichseemstohavebeeninsufficientlystudiedbydoctorsandpsychologistsistheinfluenceofgeographyandclimate
人类社会化的主要手段是()
下列哪种药的输液速度宜快
患者男,51岁,反复出现排便后肛门疼痛,时有瘙痒4年余,站立或行走过久时肿胀感,昨日突发便后肛门剧烈疼痛,咳嗽时疼痛加剧。查体见肛门处有一紫红色肿块,有触痛感,直径约50px。患者术后不会出现的情况是
葡萄胎、侵蚀性葡萄胎、绒癌的共有临床表现为()。
工程设计招标文件山()组织编制。
依法治国是党领导人民治理国家的基本方略,依法治国的实质是
以下程序将两个数从小到大输出。请填空。 {floata,b,【】; scanf(,【】&a,&b); if(a>b) {t=a; 【】; b=t; printf("%5.2f%5.2f\n",a
最新回复
(
0
)