假定在工程文件中有一个标准模块,其中定义了如下记录类型:Type Books Name As String*10 TelNuin As String*20 End Type 要求在执行事件过程Command1_Click时,在顺序文

admin2012-03-22  26

问题 假定在工程文件中有一个标准模块,其中定义了如下记录类型:Type Books
   Name As String*10
   TelNuin As String*20
   End Type
   要求在执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。将以下程序补充完整。
   Private Sub Command1_Clickk()
   DimB As Books
     open"c:\person.txt"For output As #1
     B.Name=InputBox("请输入姓名")
     B.TelNum=InputBox("请输入电话号码")
     write #1,______
     close #1
   End Sub

选项

答案Get。

解析  随机访问模式中文件的写操作使用Put命令,Put命令是将一个记录变量的内容写入所打开的磁盘文件中指定的记录位置上;随机访问模式中文件的读操作使用Get命令,Get命令是从磁盘文件将一条记录号指定的记录内容读入记录变量中。
转载请注明原文地址:https://jikaoti.com/ti/wyO0FFFM
0

最新回复(0)