首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 【说明】 某个文本文件中存放了若干个非零数值有效数据,每个数据占一行,最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这 些数据之和,其运行窗口
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在答题纸的对应栏内。 【说明】 某个文本文件中存放了若干个非零数值有效数据,每个数据占一行,最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这 些数据之和,其运行窗口
admin
2008-01-03
79
问题
阅读以下说明及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
程序员下午应用技术考试
软考初级
相关试题推荐
在Excel2003中,A1单元格中的值为information,若在A2单元格中输入文本函数“=MID(A1,8,4)”,按回车键后,则A2单元格中的值为(49)。
在Excel2007中,设单元格A1、B1、C1、A2、B2、C2中的值分别为1、3、5、7、9、11,若在单元格D1中输入函数“=MIN(A1:C2)”,按回车键后,则D1单元格中的值为__________。
把数据从本地计算机传送到远程主机称为______。
在数据通信过程中,将模拟信号还原为数字信号的过程称为______。
某企业对多项已完成的数据处理任务进行了评估,按其满意度和重要性度量值为坐标,标在下图中,用小圆表示)。这些坐标点分别落入I、Ⅱ、Ⅲ、Ⅳ四个区中。领导认为,位于________区中的任务是需要优先改进的。
在Excel中,设A1单元格中的值为2014-5-24,若在A2单元格中输入日期函数“=DAY(A1)”,按回车键后,则A2单元格中的值为(52)。
在Excel中,设单元格A1中的值为0,B1中的值为60,若在C1单元格中常规格式下输入函数“=ROUND(AVERAGE(A1:B1),2)”,按回车键后,C1单元格中的值为()。
常用的统计图表有:柱形图、条形图、折线图、饼图等。下图所示的统计图表类型为__________。
假设某Word文档中已存在宏“Marcol”,则下列方法中(48)不能正确使用这个宏。
随机试题
有以下程序#include<stdio.h>intfun(charp[][10]){intn=0,i;for(i=0;i<7;i++)if(p[i][0]==’T’)
评价稿件质量的常用方法有()。
英国的两党制和美国的两党制有哪些共同特点?
下列文章,主要用例证法来说明道理的有
关于自我传播,正确的是
可能的诊断下列哪项不应作为常规检查
胸膜摩擦音听诊的时相特点为
男性,30岁,从三楼跌下左腹部跌伤,左6、7、8肋骨骨折,脾破裂、肠破裂。入院时精神紧张。T38,5℃,面色苍白,肢端冰冷,脉搏细速,110次/分,血压130/100mmHg,尿量减少。目前不宜马上进行的检查是
加涅的学习过程八阶段理论里,学习最开始的阶段是()。
根据下列材料回答问题。2015年我国钟表全行业实现工业总产值约675亿元,同比增长3.2%,增速比上年同期提高1.7个百分点。全行业全年生产手表10.7亿只,同比增长3.9%,完成产值约417亿元,同比增长4.3%,增速提高1.9个百分点;生产时
最新回复
(
0
)