单项选择题

窗体上有一个名称为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的小数部分四舍五入，转换为整数返回

<上一题 目录 下一题>
热门 试题

问答题
在名称为Form1的窗体上添加一个名称为L1的标签，标签上标题为“请输入密码”；添加一个名称为Text1的文本框，其宽、高分别为2000和300，设置适当的属性，使的在输入密码时，文本框中显示为“*”字符。此外，再把窗体的标题设置为“密码窗口”，以上这些设置都必须在属性窗口中进行，程序运行时的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1.vbp，窗体文件名保存为sjt1.frm。
单项选择题
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。 Form1的代码如下： Public x As Integer Private Sub Form_Load() x=1 y=5 End Sub Private Sub Command1_Chck() Form2.Show End Sub Form2的代码如下： Private Sub Command1_Click() Print Form1.x，y End Sub Module1的代码如下： Public y As Integer 运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是（）。

A．1 5
B．0 5
C．0 0
D．程序有错
相关试题