有如下程序:Private Sub Form_Click()Dim s As Integer, p As Integerp=1For i=1 To 4 For j=1 To is=s+j Next j p=p * sNext iPrint pEnd Sub程序运行后,单击窗体,则输出结果是( )。
A. 在类型定义"Type RType"之前加上"Private"
B. Dim p As RType必须置于窗体模块的声明部分
C. 应把Open语句中的For Random 改为 For Output
D. Put语句应该写为Put #1,p.Name , p.Tel