在考生文件夹下有一个工程文件sjt5.vbp和随机文件in5.txt,文件中的每个记录包括三个字段,分别为姓名、电话和邮编,其名称、类型和长度如下: 窗体中有一个文本框和两个命令按钮。程序运行后,如果单击”读入并显示记录”按钮,则从考生文件夹下的in5.

admin2013-10-18  31

问题 在考生文件夹下有一个工程文件sjt5.vbp和随机文件in5.txt,文件中的每个记录包括三个字段,分别为姓名、电话和邮编,其名称、类型和长度如下:

窗体中有一个文本框和两个命令按钮。程序运行后,如果单击”读入并显示记录”按钮,则从考生文件夹下的in5.txt文件中读入所有记录并显示在文本框中(每条记录占一行,数据项的顺序是姓名、电话、邮编,如图2-160所示,可使用符号常量vbCrLf表示回车换行);若单击”保存”按钮则把文本框中的内容存入out5.txt文件中。
要求:编写”读入并显示记录”按钮的Click过程。把文本框中所有字母改为大写字母(可手工修改)。单击”保存”按钮把修改后的文本框内容存盘,否则无成绩!  (过程已给出,不能修改)。最后以原文件名保存放在考生文件夹下。

选项

答案步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码: 参考代码: Open App.Path&”\in5.txt”For Random As #1 Len=Len(pal) For i=1 To 5 Get #1,i,pal Textl.Text=Textl.Text&pal.Name Textl.Text=Textl.Text&pal.Tel Textl.Text=Textl.Text&Str(pal.Post) Textl.Text=Textl.Text+vbCrLf Next Close 1 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按<F5>键键运行程序,先单击”读入记录”按钮,然后把文本框中把所有字母改为大写字母,再单击”保存记录”按钮。

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

最新回复(0)