假定在工程文件中有一个标准模块,其中定义了如下记录类型
Type Books
Name As String*10
TelNum As String *20
End Type
要求在执行事件过程Command1_Click时,在C盘目录下的顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。
A) Private Sub Command1_Click()
Dint B As Books
Open"c: \Person.txt" For Output As#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Write#1 ,B.Name,B.TelNum
Close#1
End Sub
B) Private Sub Command1_Click()
Dim B As Books
Open"C:\Person.txt" For Input As#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Print#1,B.Name,B.TelNum
Close#1
End Sub
C) Private Sub Command1_Click()
Dim B As Books
Open"c:\Person.txt" For Output As#1
Name=InputBox("输入姓名")
TelNom=InputBox("输入电话号码")
Write #1,B
Close#1
End Sub
D) Private Sub Command1_Click()
Dim B As Book
Open"C:\Person.txt" For Input As#1
Name=InputBox("输入姓名")
TelNum-InputBox("输入电话号码")
Print #1 ,B.Name.B.TeINum
Close#1
End Sub
参考答案:A
解析: 本题考查了文件的读写操作。要向顺序文件中写入记录必须用For Output参数打开文件,然后用Print#或Write#语句将内容写入文件,因此选项B) 和选项D) 不正确:又因为自定义数据类型变量的引用要用"变量名.变量元素名",所以选项C) 是不正确的。故本题的正确答案只有选项A) 。