[单选题]

( 35 )设在工程文件中有一个标准模块,其中定义了如下记录类型:

Type Books

Name As String * 10

TelNum As String * 20

E.nd Type

在窗体上画一个名为 Command1 的命令按钮,要求当执行事件过程 Command1_Click 时,在顺序文件Person.txt 中写入一条 Books 类型的记录。下列能够完成该操作的事件过程是

A. ) Private Sub Command1_Click()

D.im B As Books

Open “ Person.txt ” For Output As #`1

B.Name=InputBox( “ 输入姓名 ” )

B.TelNum=InputBox( “ 输入电话号码 ” )

Write #1,B.Name,B.TelNum

C.lose #1

E.nd Sub

B. ) Private Sub Command1_Click()

D.im B As Books

Open “ Person.txt ” For input As #`1

B.Name=InputBox( “ 输入姓名 ” )

B.TelNum=InputBox( “ 输入电话号码 ” )

Print #1,B.Name,B.TelNum

C.lose #1

E.nd Sub

C. ) Private Sub Command1_Click()

D.im B As Books

Open “ Person.txt ” For Output As #`1

B.Name=InputBox( “ 输入姓名 ” )

B.TelNum=InputBox( “ 输入电话号码 ” )

Write #1,B

C.lose #1

E.nd Sub

D. ) Private Sub Command1_Click()

Open “ Person.txt ” For input As #`1

Name=InputBox( “ 输入姓名 ” )

TelNum=InputBox( “ 输入电话号码 ” )

Print #1, Name, TelNum

C.lose #1

E.nd Sub

参考答案与解析: