首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox("请输入:")
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox("请输入:")
admin
2019-03-14
25
问题
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:
Dim Flag As Boolean
Private Sub Command1_Click()
Dim intNum As Integer
intNum=InputBox("请输入:")
If Flag Then
Print f(intNum)
End If
End Sub
Function f(X as Integer)As Integer
If X<10Then
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的值为Tree,然后单击命令按钮,在输入对话框中输入5,执行If分支语句,调用f函数,由于5<10,因此输出X,即输出5。
转载请注明原文地址:https://kaotiyun.com/show/aZFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于栈的叙述中,正确的是
VB中,若没有显式声明变量的数据类型,则默认的类型是
设有如下程序:PrivateSubForm_Click()DimmAsSingle,nAsStringDimflagAsIntegerm=InputBox("请输入一个单精度数")n=
下列不能接收焦点的控件是
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为( )。
函数表达式Sgn(-10)的值是
在数据库系统中,用于对客观世界中复杂事物的结构及它们之间的联系进行描述的是
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是( )。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
下面程序的功能是利用随机数函数模拟掷骰子。方法是每次随机产生一个1~6的整数,相当于一次掷骰子。程序运行后,在Text2文本框中输入总投掷次数(例如10000),单击"开始投掷"按钮则进行模拟掷骰子,并把出现1~6的次数分别显示在文本框数组Text1(从上
设循环队列为Q(1:m),其初始状态为front=rear=m。经过一系列入队与退队运算后,front=20,rear=15。现要在该循环队列中寻找最小值的元素,最坏情况下需要比较的次数为
随机试题
【背景资料】某房地产开发公司(甲方)与某施工单位(乙方)签订了一份合同价款为1000万元的建设工程施工合同,合同工期为7个月,2011年3月开始施工。工程结算数据如下表所示。合同中有关工程价款的部分内容如下:(1)房地产开发公司在不迟于开工前7d向施
与完全竞争市场相比,垄断()
下列关于和解剂使用范围不正确的说法是
患者,女性,35岁。因活动后有呼吸困难,近半年有进行性加重,并伴有咳嗽,声音嘶哑,既往患者有风湿热10年,常有扁桃体炎发生,考虑为慢性风湿性心脏病二尖瓣狭窄。风湿性心脏病二尖瓣狭窄心电图表现正确的是
公开招标与邀请招标的区别主要在于()。
制定投资政策说明书的好处不包括()。
依据《中华人民共和国香港特别行政区维护国家安全法》,下列关于中央人民政府驻香港特别行政区维护国家安全公署人员的说法,正确的是()。
【2019上】最近,大三班许多小朋友用大大小小的纸盒制作小汽车等物品。马老师发现,他们制作的汽车装饰不太一样,但结构差不多,往往只有车厢、车轮、车灯等。马老师认为可以根据这种情况生成一个“汽车”主题活动,引发幼儿深度学习。请帮助马老师设计“汽车”主题活动。
自由是对必然的正确认识和对客观世界的改造。()
EachmachinesupportingTCPhasaTCPtransportentity,eitheralibraryprocedure,auserprocess,orpartofthekernel.Inal
最新回复
(
0
)