单选题 窗体上有一个名称为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/2Then
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的小数部分四舍五入,转换为整数返回
【正确答案】 D
【答案解析】[考点] 数据类型 [解析] 在VB中可以利用Type语句定义自己的数据类型;InputBox()函数用于显示一个输入框,提示用户输入一个数据,该函数返回值默认为字符串类型,其常用语法格式为:InputBox(Prompt[,Title][,Default])。其中,Prompt字符串为输入框上显示的提示文本、Title字符串在输入框的标题栏上显示、Default字符串为输入框的缺省文本;Fix函数将删除所给数的小数部份后返回剩下的整数;表达M/2=M/2可用于判断整数M是否为偶数。 本题中当输入的数是偶数时,y.b的值将为其的平方。