在考生的文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图3-131(a)所示。其中“写文件”命令按钮事件过程用来建立一个

admin2018-10-29  25

问题 在考生的文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图3-131(a)所示。其中“写文件”命令按钮事件过程用来建立一个通信录,以随机存取方式保存到文件t5.txt中;而“读文件”命令按钮事件过程用来读出文件t5.txt中的每个记录,并在窗体上显示出来。通信录中的每个记录由三个字段组成,结构如下:
    姓名(Name)  电话(Tel)  邮政编码(Pos)
    LiuMingliang  (010)62781234  100082
    各字段的类型和长度为:
    姓名(Name):字符串15
    电话(Tel):字符串15
    邮政编码(Pos):长整型(Long)
    程序运行后,如果单击“写文件”命令按钮,则可以随机存取方式打开文件t5.txt,并根据提示向文件中添加记录,每写入一个记录后,都要询问是否再输入新记录,回答“Y”(或“y”)则输入新记录,回答“N”(或“n”)则停止输入;如果单击“读文件”命令按钮,则可以随机存取方式打开文件t5.txt,读出文件中的全部记录,并在窗体上显示出来,如图3-131(b)所示。该程序不完整,请把它补充完整。要求如下:
    ①去掉程序中的注释符,把程序中的?改为正确内容,使其能正确运行,但不能修改程序中的其他部分。
    ②文件t5.txt中已有三个记录,如图3-131(b)所示,请运行程序,单击“写文件”命令按钮,向文件t5.txt中添加以下两个记录(全部采用西文方式):
    LiDaqing  (027)873487654  30065
    ChenQingshan  (022)26874321  300120
    ③运行程后,单击“读文件”命令按钮,在窗体上显示全部记录(共5个)。
    ④用原来的文件名保存工程文件和窗体文件。

选项

答案【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: RecNum=RecNum+1 Put #1,RecNum,Pers Loop While UCase(asp)<>"N" RecNum=LOF(1)/Len(Pers) Get#1,i,Pers 步骤2:按<F5>键运行程序,先单击“写文件”按钮,然后在弹出的输入框中依次按照题目要求输入两条记录,再单击“读文件”按钮在窗体上显示结果。 步骤3:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://kaotiyun.com/show/3tFp777K
0

最新回复(0)