[填空题] 设有如下记录类型: Type studentNumber As String*10Name As String*8 End Type 窗体中有若干控件,单击其中的一个按钮Comma

[填空题] 设有如下记录类型: Type studentNumber As String*10Name As String*8 End Type 窗体中有若干控件,单击其中的一个按钮Comma,第1张

[填空题] 设有如下记录类型: Type student Number As String*10 Name As String*8 End Type 窗体中有若干控件,单击其中的一个按钮Comma

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

正确答案:

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

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zaji/5473903.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-12-12
下一篇 2022-12-12

发表评论

登录后才能评论

评论列表(0条)

保存