填空题
设有如下记录类型：
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({{U}} 【11】 {{/U}})
Title $="写记录到随机文件"
Str1 $="请输入学生名"
Str2 $="请输入学生名"
For i=1 To 5
stu. Number=InputBox(Str1 $, Title $)
stu. Name=InputBox$(Str2 $, Title $)
{{U}} 【12】 {{/U}}#1, i, stu
Next i
Close{{U}} 【13】 {{/U}}
End Sub