【单选题】

窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下：

Private Type x
aAs Integer
bAs Integer
End Type
Private SubCommand1_Click()
Dim yAs x
y.a=InputBox(" ")
If y.a\2=y.a/2 Then
y.b=y.a*y.a
Else
y.b=Fix(y.a/2)
End If
Text1.Text=y.b
End Sub
对以上程序，下列叙述中错误的是______。
A、x是用户定义的类型
B、InputBox函数弹出的对话框中没有提示信息
C、若输入的是偶数，y.b的值为该偶数的平方
D、Fix(y.a/2)把y.a/2的小数部分四舍五入，转换为整数返回