[填空题] 设有如下记录类型： Type student Number As String*10 Name As String*8 End Type

[填空题] 设有如下记录类型：

Type student

Number As String*10

Name As String*8

End Type

窗体中有若干控件，单击其中的一个按钮Command1时，执行如下事件过程，该过程的功能是把数据输出到指定的文件中。根据题意，请完善下列程序。

Private sub Command1_click()

Dim stu As student

Open "C:file, dat" For Random As #1 Len=Len( 【11】 )

Title $="写记录到随机文件"

Str1 $="请输入学生名"

Str2 $="请输入学生名"

For i=1 To 5

stu. Number=InputBox(Str1 $, Title $)

stu. Name=InputBox$(Str2 $, Title $)

【12】 #1, i, stu

Next i

Close 【13】

End Sub

[11]stu [12]Put [13]#1解析：[分析]： 对于用随机访问方式打开的文件，用Len(记录类型变量)计算记录的长度。随机文件的写操作通过Put语句来实现，其格式为： Put#文件号，[记录号]，变量 文件的读写操作结束后，应将文件关闭，这可以通过Close语句来实现，其格式为： Close[[#]文件号][，[#]文件号]…