itgle.com

阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在答题纸的对应栏内。【说明】某个文本文件中存放了若干个非零数值有效数据，每个数据占一行，最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这些数据之和，其运行窗口如下。用户只要通过驱动器列表框、目录列表框和文件列表框，选择文本文件所在的驱动器、文件夹及相应的文件名，再单击“累计”按钮，就能在“总计”文本框中看到该文本文件中的数据之和。在开发过程中，设驱动器列表框名为Drivel，目录列表框名为Dirl，文件列表框名为File

题目

阅读以下说明及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.阅读以下说明和流程图，将应填入(n)处的字句写在对应栏内。【说明】已知头指针分别为La和lb的有序单链表，其数据元素都是按值非递减排列。现要归并La和Lb得到单链表Lc，使得Lc中的元素按值非递减排列。程序流程图如下所示：

2.阅读以下说明和流程图，将应填入(n)处的字句写在对应栏内。[说明]设学生某次考试的成绩按学号顺序逐行存放于某文件中，文件以单行句点“.”为结束符。下面的流程图读取该文件，统计出全部成绩中的最高分max和最低分min。

3.阅读下面的说明，回答问题1～问题4，将解答填入答题纸对应的解答栏内。[说明]阅读以下说明，回答问题1～问题4，将解答填入答题纸对应的解答栏内。windows Server 2003是一个多任务多用户的操作系统，能够以集中或分布的方式实现各种应用服务器角色，是目前应用比较广的操作系统之一。Windows内置许多应用服务功能，将下表中(1)～(5)处空缺的服务器名称填写在答题纸对应的解答栏内。(1)

4.阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。【说明】以下程序为求行列式X(5,5)的值S。【Visual Basic代码】Private Function col ( byval x ( 5,5 ) as integer ) as longdim fesult as longdim temp as longdim I as integerdim j as integerdim k as imegerresult = 0for I = to 5(1)for j = 1 to 5if I+j＞6 thenk= ( 1+j ) mod 5elsek=1endiftemp=temp*x ( k,j )(2)result=(3)(4)(5)End function

参考答案和解析
正确答案：(1)Drivel．Drive (2)Dirl．Path (3)fso (4)myTextFile (5)d＞0
(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)。
更多“ 阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在答题纸的对应栏内。【说明】某个文本文件中存放了若干个非零数值有效数据，每个数据占一行，最后一行以数字“0”作为结束标志。下面的程序用于计算”相关问题

  • 第1题：

    阅读下列程序说明和C++程序，把应填入其中(n)处的字句，写在对应栏内。

    【说明】

    阅读下面几段C++程序回答相应问题。

    比较下面两段程序的优缺点。

    ①for (i=0; i＜N; i++ )

    {

    if (condition)

    //DoSomething

    …

    else

    //DoOtherthing

    …

    }

    ②if (condition) {

    for (i =0; i＜N; i++ )

    //DoSomething

    }else {

    for (i=0; i ＜N; i++ )

    //DoOtherthing

    …

    }


    正确答案：程序1优点：程序简洁；缺点：多执行了N-1次逻辑判断并且程序无法循环“流水”作业使得编译器无法对循环进行优化处理降低了效率。 程序2优点：循环的效率高；缺点：程序不简洁。
    程序1优点：程序简洁；缺点：多执行了N-1次逻辑判断，并且程序无法循环“流水”作业，使得编译器无法对循环进行优化处理，降低了效率。 程序2优点：循环的效率高；缺点：程序不简洁。

  • 第2题：

    试题三（共 15 分）

    阅读以下说明和 C 程序，将应填入 （n） 处的字句写在答题纸的对应栏内。


    正确答案：

  • 第3题：

    阅读下列说明和?C++代码，将应填入(n)处的字句写在答题纸的对应栏内。
    【说明】
    阅读下列说明和?Java代码，将应填入?(n)?处的字句写在答题纸的对应栏内。
    【说明】
    某快餐厅主要制作并出售儿童套餐，一般包括主餐(各类比萨)、饮料和玩具，其餐品种
    类可能不同，但其制作过程相同。前台服务员?(Waiter)?调度厨师制作套餐。现采用生成器?(Builder)?模式实现制作过程，得到如图?6-1?所示的类图。






    答案：
    解析：

  • 第4题：

    ●试题二

    阅读下列函数说明和C代码，将应填入(n)处的字句写在答题纸的对应栏内。

    【说明】

    该程序运行后，输出下面的数字金字塔

    【程序】

    include<stdio．h>

    main ()

    {char max，next；

    int i；

    for(max=′1′；max<=′9′；max＋＋)

    {for(i=1；i<=20- (1) ；＋＋i)

    printf(" ")；

    for(next= (2) ；next<= (3) ；next＋＋)

    printf("％c"，next)；

    for(next= (4) ；next>= (5) ；next--)

    printf("％c"，next)；

    printf("＼n")；

    }

    }


    正确答案：
    ●试题二【答案】(1)(max-′0′)(2)′1′(3)max(4)max-1(5)′1′【解析】该程序共有9行输出，即循环控制变量max的值是从1～9。每行输出分3部分，先用循环for语句输出左边空白，(1)空填"(max-′0′)"；再用循环输出从1到max-′0′的显示数字，即(2)空和(3)空分别填1和max；最后输出从max-′1′～1的显示数字，即(4)空和(5)空分别填和max-1和′1′。

  • 第5题：

    （）阅读下列说明和C语言程序，将应填入 （n）处的语句写在答题纸的对应栏内。[说明]下面程序是一个带参数的主函数，其功能是显示在命令行中输入的文本文件内容。[C语言函数]#include"stdio．h"main(argc,argv) int argc； char *argv[]； ｛ （1） ； if((fp=fopen(argv[1]，”r’’))== （2） ) ｛ printf(”file not open！＼n”)；exit(0)；｝ while( （3） ) putchar( （4） )； （5）； ｝


    正确答案：（）
    （1）FILE *fp； （2）NULL  （3）！feof(fp)  （4）fgetc(fp)   （5）fclose(fp)
    从程序功能来看，程序中需要用到文件型指针变量中，而主函数体没有定义，所以（1）应该填写的是“FILE *fp；”。接下来的语句是标准的打开只读文本文件的语句，显示的是文件没打开，说明文件名不存在，也就是为“NULL”。接着的while循环语句中有两处空白。前一个空白是控制循环的条件，从程序功能来看，要将文本文件中的所有字符显示出来，这儿当然只能填写“不是文件尾则继续循环”，具体说，需要填写的是“！feof(fp)”。（4）出现在循环体中的语句中，该循环体的功能是从fp指向的文本文件中读取单个字符并显示在屏幕上，此处使用的是putchar函数，该函数的功能是将形参对应的字符显示在屏幕上，所以该处的空白就是要显示的字符，这个字符必须是从文本文件中读取的单个字符，完成这项工作的可以利用fgetc()函数，所以（4）填写的是“fgetc(fp)”。最后一句应当是关闭文件，所以（5）应填fclose(fp)。

相关内容