窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Typ

admin2010-09-11  32

问题 窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明:    Type Person      name As String*8      major As String*20    End Type    当单击“Command1”按钮时,能够正确地把数据写入文件的程序段是______。

选项 A、Private Sub Command1_Click()           Dim p As Person           p. name=Text1. Text           p. major=Text2. Text           Open"C:\data. dat" For Random As #1           Put #1, 1, p           Close #1         End Sub
B、Private Sub Command1_Click()           Dim p As Person           p. name=Text1.Text           p. major=Text2. Text           Open"C:\data. dat" For Random As #1           Get #1, 1, p           Close #1         End Sub
C、Private Sub Command1_Click()           Dis p As Person           p. name=Text1. Text           p. major=Text2. Text           open "C:\data. dat" For Random As #1 Len=Len(p)           Put #1, 1, p           Close #1         End Sub
D、Private Sub Command1_Click()           Dim p As Person           p. name=Text1. Text           p. major=Text2. Text           Open "C:\data. dat" For Random As #1=Len(p)           Get #1, 1, p           Close #1         End Sub

答案C

解析 以随机方式打开的随机文件的写操作是通过Put语句实现的,其格式为:
Put#文件号,[记录号],变量
这里的“变量”是除了对象变量和数组变量之外的任何变量(包括含有单个数组元素的下标变量)。Put语句把“变量”的内容写入由“文件号”所指定的磁盘文件中。
转载请注明原文地址:https://kaotiyun.com/show/uRmp777K
0

随机试题
最新回复(0)