有如下程序：Private type stu X as string Y as integerEnd typePrivate Sub Command1_Click（)

D有如下程序：

Private type stu

X as string

Y as integer

End type

Private Sub Command1_Click()

Dim a as stu

a.x=”ABCD”

a.Y=12345

print a

End Sub

程序运行时出现错误，错误的原因是

A)Type定义语句没有放在标准模块中

B)变量声明语句有错

C)赋值语句不对

D)输出语句print不对