2. 计算机
  3. 设有如下记录类型： Type student Number As String*10 Name As String*8 End Type 窗体中有若干控件，单击其中的一个按钮Command1时，执行如下事件过程，该过程的功能是把数据输出到指定的文件中。根据

设有如下记录类型： Type student Number As String*10 Name As String*8 End Type 窗体中有若干控件，单击其中的一个按钮Command1时，执行如下事件过程，该过程的功能是把数据输出到指定的文件中。根据

admin2013-04-11  43
问题 设有如下记录类型：
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(【  】)
Title $="写记录到随机文件"
Str1 $="请输入学生名"
Str2 $="请输入学生名"
For i=1 To 5
stu. Number=InputBox(Str1 $, Title $)
stu. Name=InputBox$(Str2 $, Title $)
【  】#1, i, stu
Next i
Close【  】
End Sub
选项
答案stu ,Put ,#1
解析 对于用随机访问方式打开的文件，用Len(记录类型变量)计算记录的长度。随机文件的写操作通过Put语句来实现，其格式为：
Put#文件号，[记录号]，变量
文件的读写操作结束后，应将文件关闭，这可以通过Close语句来实现，其格式为：
Close[[#]文件号][，[#]文件号]…
转载请注明原文地址:https://kaotiyun.com/show/rihp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)