首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=
admin
2020-07-22
34
问题
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:
Dim Flag As Boolean
Private Sub Command1_Click()
Dim intNum As Integer
intNum=InputBox("请输入:")
IfFlag Then
Print f(intNum)
End If
End Sub
Function f(X as Integer)As Integer
IfX<10 Then
Y=X
Else
Y=X+10
End If
f=Y
End Function
Private Sub Form_MouseUp(Button As Integer,Shift As
Integer,X as Single,Y As Single)
Flag=True
End Sub
运行程序,首先单击窗体,然后单击命令按钮,在输入对话框中输入5,则程序的输出结果为( )。
选项
A、0
B、5
C、15
D、无任何输出
答案
B
解析
本题考查If语句和函数过程的分析。函数过程f的功能是如果X小于10则返回X,否则返回X+10。窗体的MouseUp事件是松开鼠标时触发的事件。程序运行后,单击窗体,则全局变量Flag的值为True,然后单击命令按钮,在输入对话框中输入5,执行If分支语句,调用f函数,由于5<10,因此输出X,即输出5。
转载请注明原文地址:https://jikaoti.com/ti/uzS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多砬整数")Fork=1ToLen(x)b=Mid(x,
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是
编写如下程序:PrivateSubCommandl_Click()DimnAsInteger:StaticsAsIntegerForn=1To3s=s+nNextPrin
现有如下一段程序:OptionBase1PrivateSubCornmand1_Click()Dimaa=Array(3,5,7,9):x=1Fori=4To1Step-1s=s+a(i)*x:x=x*1
(1)考生文件夹中有工程文件sjt3.vbp。在窗体上有名称为Combol的组合框,请设置该组合框的属性,使该组合框只能用于选择操作,不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断"的命令按钮。程序运行时在组合框中选中一项,如图5(a)所示,
以下叙述中错误的是
若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是( )。
下列数据结构中,能用二分法进行查找的是()。
下面不能作为结构化方法软件需求分析工具的是
下列关于栈和队列的描述中,正确的是()。
随机试题
单极胸导V5电极应放在
A.胃、十二指肠溃疡穿孔B.急性胰腺炎C.胆道蛔虫症D.腹型癫痫E.幽门梗阻腹痛位置不定
A.Ⅰ期B.Ⅱ期C.Ⅲ期D.Ⅳ期()临床试验是治疗作用明确阶段,其目的是最终为药物注册申请的审查提供充分依据。病例数不得少于300例。
对不同公司投入公司的同类资产,应当采用同一价格标准评估。()
我国的四大名绣是湘绣、蜀绣、苏绣和______。
村级重大事务的民主决策,必须遵循()原则。
下图是经纬网图层和中国省级行政中心图层的叠加图,图中经纬线间隔度数相等。读图,回答下列问题。经纬网的纬线间距为()。
根据布罗德本特过滤器理论的观点,过滤器工作的原则是()
设置表单的AlwaysOnTop属性值为______,可将表单总是位于其他打开窗口之上。
在考生文件夹下JOSEF文件夹中建立一个名为MYPROG的新文件夹。
最新回复
(
0
)