首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 【应用说明】 某应用程序可选择打开用户指定的文本文件,将其内容显示在指定的文本框内供用户编辑,并将编辑后的结果保存在用户指定的文件中。运行时的窗口如图6-1所示
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 【应用说明】 某应用程序可选择打开用户指定的文本文件,将其内容显示在指定的文本框内供用户编辑,并将编辑后的结果保存在用户指定的文件中。运行时的窗口如图6-1所示
admin
2009-05-15
91
问题
阅读以下应用说明及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
程序员下午应用技术考试
软考初级
相关试题推荐
某地区对高二学生举行了一次数学统考,并按“成绩-人数”绘制了分布曲线。考试成绩呈(12)________________,分布比较合理。
Windows7系统运行时,用户用鼠标右击某个对象经常会弹出________________。
在实施项目过程中,信息处理员小王在“时间T-项目剩余工作量R”平面坐标系上动态地记录了项目实施进度,并与计划进度做了对比。在项目实施中途,从图上可以看出该项目()。
企业建立生产和库存管理系统的目的不包括()。
上级要求信息处理技术员做a、b、c、d、e五件工作。先做什么,后做什么,如何安排呢?根据工作性质以及紧急程度,他列出了如下几条规则:a应在b前 c应在a前 d应在a前 a应在e前d应在b前 b应在e前 c应在d前 c应在
要使Word能自动提醒英文单词的字母拼写是否正确,应设置Word的(47)选项功能。
图文混排是Word的特色功能之一,下列叙述中,不正确的是(46)。
阅读以下说明,回答问题1至问题5,将解答填入答题纸对应的解答栏内。说明某公司内部有一个采用TCP/IP作为传输协议的100BASE-TX局域网,包括1台服务器和20台客户机,通过一台16端口的交换机与一台8端口共享集线器级连,其网络结构如图11所
阅读下列说明和HTML文本,分析其中嵌入的JavaScrlpt脚本,将应填入<u>(n)</u>处的语句写在对应栏内。[说明]本题实现用鼠标拖拽图片在Web页内移动的功能。将鼠标放在图片上,按下左键,移动鼠标便可带动图片一起移动。[
随机试题
直流电动机转速与电源电压有关。()
下潜油电泵当油管下到最后1根时,在距井口以下5m处的油管上打1~2个电缆卡子。()
A.瘙痒症B.慢性单纯性苔藓C.湿疹D.夏季皮炎E.扁平苔藓以阵发性剧痒及皮肤苔藓样变为特征的慢性炎症性皮肤病
雷尼替丁的临床适应证不包括
某检察院在对国家机关工作人员张某巨额财产来源不明案进行侦查时,发现其巨额财产三分之二为诈骗所得,三分之一为盗窃所得。关于此案,下列哪一选项是正确的?()
团体初创阶段的活动主要有两类,它们是()。
材料:下面是某初中生物教师编制的客观题试题:一、单项选择题①植物根部通过根毛吸收而来的水分和无机盐进入植物体内后通过()运送到植物的枝、叶、花和果实。A.导管B.筛管C.细胞间质②植物的繁殖器官是()。A.根、茎、叶B
A公司向银行借入短期借款10000元,支付银行贷款利息的方式同银行协商后,银行提出三种方案:
“天下兴亡。匹夫有责”。但有人认为。天塌下来有高个子顶着。这种现象你怎么看?
袋子中有黑球3个,白球4个,无放回式拿出。则第一次拿到白球,第二次拿到黑球,第三次拿到白球的概率是()。
最新回复
(
0
)