网友您好， 请在下方输入框内输入要搜索的题目：
设在工程文件中有一个标准模块，其中定义了下列记录类型：
Type Books
Name As String*10
TelNum As String*20
End，Type
在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1 Click 时，在顺序文件Person．txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是（ ）。
A.Private Sub Command1 Click（ ）
Dim B AS Books
Open"Person txt"For Output As#1
Name=InputBox(”输入姓名”)
relNum=lnputBox(”输入电话号码”)
Wlite#1 B Name，B TelNum
Ch,se#1
End Sub
B.Private Sub Command1 Click（ ）
Dim B AS Books
Open"Person txt"For Input As#1
>Name=InputBox("输入姓名")
TelNum=InputBox("输入电话号码")
Print#1，B．Name，B．TelNam
Close#1
End Sub
C.Private Sub Command1 Click（ ）
Dim BAS Books
Open"Person txt"For Output As#1
Name=InputBox("输入姓名")
TelNum=InputBox("输入电话号码")
Write#1，B
Close#1
End Sub
D.Private Sub Commandl Click（ ）
Open"Person txt"For Input As#1
Name=lnputBox("输入姓名")
TelNum=lnputBox("输入电话号码")
Prim#1 Name TelNum
Close#1
End Sub
参考答案
更多 “ 设在工程文件中有一个标准模块，其中定义了下列记录类型：Type BooksName As String*10TelNum As String*20End，Type在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1 Click 时，在顺序文件Person．txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是（ ）。A.Private Sub Command1 Click（ ）Dim B AS BooksOpenPerson txtFor Output As#1Name=InputBox(”输入姓名”)relNum=lnputBox(”输入电话号码”)Wlite#1 B Name，B TelNumCh,se#1End SubB.Private Sub Command1 Click（ ）Dim B AS BooksOpenPerson txtFor Input As#1Name=InputBox(输入姓名)TelNum=InputBox(输入电话号码)Print#1，B．Name，B．TelNamClose#1End SubC.Private Sub Command1 Click（ ）Dim BAS BooksOpenPerson txtFor Output As#1Name=InputBox(输入姓名)TelNum=InputBox(输入电话号码)Write#1，BClose#1End SubD.Private Sub Commandl Click（ ）OpenPerson txtFor Input As#1Name=lnputBox(输入姓名)TelNum=lnputBox(输入电话号码)Prim#1 Name TelNumClose#1End Sub ” 相关考题
