[单选题]某人编写了向随机文件中写一条记录的程序，代码如下：该程序运行时有错误，修改的方法是（　　）。

A在类型定义“Type RType”之前加上“Private”

BDim p As RType必须置于窗体模块的声明部分

C应把Open语句中的For Random改为For Output

DPut语句应该写为Put#1，p.Name，p.Tel