网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
窗体上有一个名称为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的小数部分四舍五入，转换为整数返回
参考答案
更多 “ 窗体上有一个名称为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的小数部分四舍五入，转换为整数返回 ” 相关考题
考题
在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后， Command1 为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load（）Command1 Enabled=FalseEnd SubPrivate Sub Text1_ ________ （）Command1 Enabled=TrueEnd Sub
考题
（ 7 ） 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框 。 程序运行后 ， Command 1为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1.Enabled = FalseEnd SubPrivate Sub Text1_ 【 7 】 ()Command1.Enabled = TrueEnd Sub
考题
在窗体上面显示一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click() Text1.Text="Visual" ME．Text1="Basic" Text1="Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是______。A．VisualB．BasicC．ProgramD．出错
考题
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（ ）。
考题
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
考题
在窗体上有一个名称为Command1的命令按钮，并有如下程序：程序执行时，单击命令按钮Command1三次后，窗体上显示的结果为（ ）。A. 5 16B. 5 6C. 15 15D. 15 6
考题
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。
热门标签
最新试卷
