2. 计算机
  3. 窗体上有一个名称为Textl的文本框，一个名称为Commandl的命令按钮。窗体文件的程序如下： Private Type X a As Integer b As Integer End Type Private Sub Com

窗体上有一个名称为Textl的文本框，一个名称为Commandl的命令按钮。窗体文件的程序如下： Private Type X a As Integer b As Integer End Type Private Sub Com

admin2018-12-20  48
问题 窗体上有一个名称为Textl的文本框，一个名称为Commandl的命令按钮。窗体文件的程序如下：
  Private Type X
    a As Integer
    b As Integer
  End Type
  Private Sub Commandl—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 lf
    Textl．Text＝y．b
    End Sub
对以上程序，下列叙述中错误的是(     )。
选项 A、x是用户定义的类型
B、InputBox函数弹出的对话框中没有提示信息
C、若输入的是偶数，y．b的值为该偶数的平方
D、Fix(y．a／2)把y．a／2的小数部分四舍五入，转换为整数返回
答案D
解析 x是用户定义的一种变量类型，可以使用它来声明变最。InputBox(“”)函数的提示信息为“”，即为空，因此弹出的对话框中没有提示信息。存程序中通过比较输入的数被2整除和被2除的值是否相等来判定它是否为偶数，如果是那么y．b的值就是y．a的值的平方。Fix函数是取整函数，它会删除小数部分，直接取表达式的整数部分，不四舍五入，因此D选项错。
转载请注明原文地址:https://kaotiyun.com/show/CfFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)