单项选择题

以下程序段实现的功能是____    __。
Option Explicit 
 Sub appeS_file1() 
 Dim StringA As String, X As Single 
 StringA="Appends a new number:" 
 X=-85 
 Open "d:\S_file1.dat" For Append As #1 
 Print #1, StringA; X 
 Close 
 End Sub A.
建立文件并输入字段 B.
打开文件并输出数据 C.
打开顺序文件并追加记录 D.
打开随机文件并写入记录