单项选择题

有如下程序:
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不对