填空题

建立随机文件F1.DAT,存放职工姓名和编号,然后把该文件中数据读出显示。请在 【14】 【15】 处将程序补充完整。
Type worker
name As String*10
pay As Single
End Type
Dim workl AS worker
Open"F1.dat"For Random As#1 Len=Len(workl)
Work1.name="LiuMin":work1.pay=400#
【14】
Close#1
Open"F1.dat"For Random As#1 Len=Len(work1)
【15】
Print"work1:",workl.name
Print"work1:",workl.pay
C10se#1

【参考答案】

[14]Put#1,1,work1
[15] Get#1,1,work1