在工程中的标准模块中定义了如下数据类型:
Type fruit
orange As Integer
apple As Integer
End Type
在窗体上有—命令按钮Command1,要求当单击命令按钮时在C:\根目录下的顺序文件myfrtac.txt 中写入一条记录,下列能够完成改操作的事件过程是______ 。
A.Private Sub Command1_Click()
Dim myfrt As fruit
myfrt. orange = 5
myfrt. apple = 10
Open “c:\myfrta. txt” For Output As #1
Print #1, myfrt. orange; myfrt. apple
Close #1
End Sub
B.Private Sub Command1_Click()
Dim myfrt As fruit
myfrt. orange= 5
myfrt. apple= 10
Open “c:\myfrtac. txt”For Input As #1
Print #1, myfrt, orange; myfrt. apple
Close #1
End Sub
C.Private Sub Command1_Click()
Dim myfrt As fruit
myfrt. orange= 5
myfrt. apple = 10
Open “c:\myfrtac. txt” For As #1
Print #1, myfrt. orange; myfrt. apple
Close #1
End Sub
D.Private Sub Command1_Click()
Dim myfrt As fruit
myfrt. orange = 5
myfrt. apple= 10
Open “c:\myfrtac..txt” For Output As #1
Print myfrt. orange; myfrt. apple
Close #1
End Sub
参考答案:A