首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 【说明】 某个文本文件中存放了若干个非零数值有效数据,每个数据占一行,最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这 些数据之和,其运行窗口
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 【说明】 某个文本文件中存放了若干个非零数值有效数据,每个数据占一行,最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这 些数据之和,其运行窗口
admin
2008-01-03
103
问题
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在答题纸的对应栏内。
【说明】
某个文本文件中存放了若干个非零数值有效数据,每个数据占一行,最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这
些数据之和,其运行窗口如下。
用户只要通过驱动器列表框、目录列表框和文件列表框,选择文本文件所在的驱动器、文件夹及相应的文件名,再单击“累计”按钮,就
能在“总计”文本框中看到该文本文件中的数据之和。
在开发过程中,设驱动器列表框名为Drivel,目录列表框名为Dirl,文件列表框名为Filel,存放数据的文本文件名为D:\test\vb7\datA
.txt,“累计”按钮名为sum,“总计”文本框(TextBox)名为textl。
【Visual Basic代码】
Private Sub Drivel_Change()
Dirl.Path=(1) ’户选择的驱动器反映到目录列表框中
End Sub
Private Sub Dirl_Change()
Filel.Path=(2) ’用户选择的文件夹改变文件列表框内容
End Sub
Private Sub sum_Click()
Dim (3) As New FileSystemOject, (4) As TextStxeam
’创建自己的文件系统对象,说明自己的文本流对象
If Right (Dirl.Path,1)="\"Then
SetmyTextFile=fso.OpenTextFile (Dirl.Path+Filel.FileNamc)
Else
SetmyTextFile=fso.OpenTextFile(Dirl.Path+”\’+Filel.FileName)
End“
S=0
Do
d=Val (myTextFilE.ReadRow)
S=S+d
Loop While (5)
Textl.Text=Str$(S)
End Sub
选项
答案
(1)Drivel.Drive (2)Dirl.Path (3)fso (4)myTextFile (5)d<>0
解析
驱动器列表框(DriveListBox)、目录列表框(DirListBox)和文件列表框(FileListBox)是Visual Basic提供的内部控件,驱动器列表框
(DriveListBox)可自动填写驱动器的名字和卷标,目录列表框(DirListBox)可显示指定驱动器的目录树,而文件列表框 (FileListBox)则是一
个特殊的ListBox控件,它显示指定目录下的所有文件,并可选择按文件的名字、扩展名或属性排列内容。
这些控件常常在一个窗体中工作,当用户在DriveListBox中选择一个驱动器时, DirListBox控件就更新显示该驱动器上的目录树,当用户
在DirListBox中选择一条路径时,FileListBox控件中的内容为该目录下的文件列表,这些活动自动地触发Change事件。但是,这些活动不能自
动完成,需要为Change事件编写代码,通过代码将驱动器列表框的Drive属性(指明当前驱动器)赋值给目录列表框的Path属性,将目录列表框的
Path属性(指明当前路径)赋值给文件列表框的Path属性,即Dirl.Path=Drivel.Drive, Filel.Path=Dirl.Path。
“Dim”是声明变量的关键字,在过程sum_Click()中,显然是对文件系统对象fso和文本流对象myTextFile进行声明。
根据题目的说明,所处理的文本文件中存放了若干个非零数值有效数据,每个数据占一行,最后一行以数字“0”作为结束标志。计算该文
件中的数据之和时,当读入的数据d等于0时应结束计算。因此,根据循环控制,空(5)处填写“d<>0”(d不等于0)。
转载请注明原文地址:https://kaotiyun.com/show/ZzjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
在数据通信过程中,将模拟信号还原为数字信号的过程称为______。
小张和小王负责向数据库中录入一批图书数据(如:书名、作者和出版社等),要求在保证质量的前提下,尽可能高效率地完成任务,采用以下______方式比较恰当。
在Excel中,设A1单元格中的值为2014-5-24,若在A2单元格中输入日期函数“=DAY(A1)”,按回车键后,则A2单元格中的值为(52)。
欲在桌面上移动窗口位置可以拖曳(36)。
假设某Word文档中已存在宏“Marcol”,则下列方法中(48)不能正确使用这个宏。
在Excel当前工作表中有学生的数据表(包含学号、姓名、专业、课程、成绩等字段),为查询指定专业下每门课程的平均成绩,下列选项中最合适的方法是______。
下面不属于软件开发过程的是______。
在Excel中,若A1单元格中的函数为"=IF("教授">"助教",TRUE,FALSE)",按回车键后,A1单元格中的显示内容为______。
随机试题
锅炉燃烧设备的惯性越大,当负荷变化时,恢复汽压的速度越快。()
热导率的单位为()。
放疗物理剂量师的工作范围
患者身目俱黄,黄色晦暗,腹胀纳少,神疲畏寒,大便不实,口淡不渴,舌淡苔腻,脉濡缓。诊断为黄疸。其证候是
请将左边的进境货物的种类连线对应其正确的申报地点(有可能一对多或多对一)。来料加工内销货物进境地海关一般进口货物指运地海关留购的展览品货物所在地主管海关
根据《上:海市旅行社管理办法》规定,上海市旅游行政管理部门对旅行社管理时实行旅行社行业协会制度。下列关于旅行社行业协会的表述正确的有()。
简述影响消费者行为的主要因素。
"Interculturalcommunication"iscommunication【51】membersofdifferentcultures.Thisdefinitionissimple,【52】theprocessisco
Whatisthenewsmainlyabout?
Peoplethinkingabouttheoriginoflanguageforthefirsttimeusuallyarriveattheconclusionthatitdevelopedgraduallyas
最新回复
(
0
)