问题 单项选择题

窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序 如下: Private Type xa As Integerb As Integer End Type Private Sub Command1_Click()Dim y As xy.a=InputBox("")If y.a\2=y.a/2 Then y.b=y.a * y.aElse y.b=Fix(y.a/2)End IfText1.Text=y.b End Sub 对以上程序,下列叙述中错误的是( )。

A.x是用户定义的类型

B.InputBox函数弹出的对话框中没有提示信息

C.若输入的是偶数,b的值为该偶数的平方

D.Fix(a/2)把a/2的小数部分四舍五入,转换为整数返回

答案

参考答案:D

解析: 本题考查的考点是有关自定义类型和Fix函数的。用户可以通过丁冲e语句自定义类型,并可用自定义的类型声明变量。注意Fix函数是向下取整,Round函数是四舍五入。

单项选择题
单项选择题