万能百科  > 计算机   > 

[多项选择题] 在考生的文件夹下有一个工程文件sj5.vbp,相应的窗体文件为sj5.frm。在窗体Form1上有两个命令按钮,其名称分别为Cmd1和Cmd2,

2021-07-20   

[多项选择题] 在考生的文件夹下有一个工程文件sj5.vbp,相应的窗体文件为sj5.frm。在窗体Form1上有两个命令按钮,其名称分别为Cmd1和Cmd2,标题分别为“文件写入”和“文件读出”,如下图所示。

其中“文件写入”命令按钮事件过程用来建立一个通信录,以随机存取方式保存到文件out57.txt中;而“文件读出”命令按钮事件过程用来读出文件out57.txt中的每个记录,并在窗体上显示出来。

通信录中的每个记录由3个字段组成,结构如下:

各字段的类型和长度为:

姓名(Name):字符串 15

电话(Tel):字符串 15

邮政编码(Pos)长整型(Long)程序运行后,如果单击“文件写入”命令按钮,则可以随机存取方式打开文件out57.txt,并根据提示向文件中添加记录,每写入一个记录后.都要询问是否再输入新记录,回答“Y”(或“y”)则输入新记录,回答“N”(或“n”)则停止输入;如果单击“文件读出”命令按钮,则可以随机存取方式打开文件outs7.txt,读出文件中的全部记录,并在窗体上显示出来。该程序不完整,请把它补充完整。要求:

1.去掉程序中的注释符“’”,把程序中的问号“”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。

2.文件out57.txt中已有3个记录,请运行程序,单击“文件写入”命令按钮,向文件out57.txt中添加以下2个记录(全部采用西文方式),如下所示。Abcd

(010)51688765

100065

Efgh

(010)51684321

100044

3.运行程序,单击“文件读出”命令按钮,在窗体上显示全部

正确答案:

A.打开题目所给工程文件; B.将注释语句改为: Rec Num=RecNum+A Put#A,RecNum,Pers Loop While UCase(asp)=”Y” Rec Num=LOF(A)/Len(Pers) Get#A,i,Pers C.按要求保存文件即完成本题。

词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。

标签