9.3·随机文件 武汉职业技术学晚 下面的例子使用Get语句来将数据从文件读到 变量中 Dim Student1 As Student, Position As Long 声明变量 Open "Schoo. dat For Random As #1 为随机访问打开样本文件 Len=Len Student1) 使用Get语句来读样本文件 Position=4 定义记录号 Get #1. Position, Student 1 读第4个记录到变量 Student1中 Close#1关闭文件下面的例子使用Get语句来将数据从文件读到 变量中 • Dim Student1 As Student, Position As Long • 声明变量 • Open School.dat For Random As #1 为随机访问打开样本文件 • Len=Len(Student1) 使用Get语句来读样本文件 • Position=4 定义记录号 • Get #1，Position，Student1 读第4个记录到变量Student1中 • Close #1 关闭文件 9.3 随机文件