窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x a As Integer b As Integer End Type Private Sub Command1_Click( ) Dim y As 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的小数部分四舍五入,转换为整数返回