单项选择题
设在菜单编辑器中定义了—个菜单项,名为menul。为了在运行时隐藏该菜单项,应该使用的语句是
A.menu1.Enabled=True
B.menu1.Enabled=False
C.menu1.Visible=True
D.menu1.Visible=False
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”;一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中(窗体外观如下图),则能够实现上述要求的语句序列是
点击查看答案&解析
单项选择题
在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述功能的代码是
A.Private Sub Command1_Click( )
x=Input Box("请输入整数")
a=F1(Val(x))
Print a
End Sub
Function Fl(ByRef b As Integer)
If b Mod2=0 Then
Return0
Else
Return 1
End lf
End Function
B.Private Sub Command1_Click( )
x=Input Box(“请输入整数”)
a=Fl(Val(x))
Print a
End Sub
Function Fl(ByRef b As Integer)
lf b Mod 2=0 Then
Fl=0
Else
Fl=1
End lf
End Function
C.Private Sub Command1 Click()
x= Input Box(“请输入整数”)
F1(Val(x))
Print a
Enb Sub
Function Fl(ByRef b As Integer)
If b Mod2=0 Then
Fl=1
Else
Fl=0
End lf
End Function
D.Private Sub Command1_Click( )
x=Input Box(“请输入整数”)
F1(Val(x))
Print a
End Sub
Function Fl(ByRef b As Integer)
lf b Mod2=0 Then
Return 0
Else
Return1
End lf
End Function
点击查看答案&解析
相关试题
为了改变计时器控件的时间间隔,应该修改该...
在菜单编辑器中建立了一个菜单,名为pmenu...
在窗体上画一个名称为Label1的标签和一个...
在窗体上画一个命令按钮,其名称为Command...
在窗体上画一个名称为Command1的命令按钮...