VisualBasic程序设计作者郭字周第10章课件.pptVIP

随机文件的写操作可以用Put语句实现。其语法格式如下： Put [#]〈文件号〉, [记录号],〈变量名〉 说明： 1) 该语句把变量中的数值写入指定文件中记录号指定的记录位置。 2) [记录号]是大于1的整数。如果省略记录号，则新记录将插入当前记录之后。另外，如果省略记录号，则用于分界的逗号必须写出，不能忽略。 1. 随机文件写操作 【例10-6】 设计一个程序，向随机文件student.txt中写入学生信息。 学生信息包含多项内容，这里用Type…End Type定义记录结构。 Private Type student ’用户定义数据类型，在代码窗口的最上端定义 xuehao As String * 10 xingming As String * 16 nianling As Integer jiguan As String * 30 End Type Private Sub Command1_Click() Dim stu As student Dim i As Integer, j As Integer Open D:\test\student.txt For Random As #1 Len = Len(stu) ’Len(stu)是每个人信息的长度 i = LOF(1) / Len(stu)