首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮,名称为Commandl,然后编写如下程序: Dim FlagAs Boolean Private Sub Commandl—Click() Dim intNum As Integer intNum=I
在窗体上画1个命令按钮,名称为Commandl,然后编写如下程序: Dim FlagAs Boolean Private Sub Commandl—Click() Dim intNum As Integer intNum=I
admin
2016-03-21
49
问题
在窗体上画1个命令按钮,名称为Commandl,然后编写如下程序:
Dim FlagAs Boolean
Private Sub Commandl—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
V=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://kaotiyun.com/show/FgLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下列二叉树,对此二叉树前序遍历的结果是()。
若在Shape控件内以FillStyle属性所指定的图案填充区域,而填充图案的线条的颜色由FillColor属性指定,非线条的区域由BackStyle属性填充,则应______。
用LineInput语句从顺序文件读出数据时,每次读出一行数据。所谓一行是指遇到______分隔符,即认为一行的结束。
表达式Sb(Len("123"))+Str(77.7)的值为()。
实体完整性约束要求关系数据库中元组的属性值不能为空。
下面可以产生20~30(含20和30)的随机整数的表达式是
下面描述中错误的是
下列叙述中,不属于软件需求规格说明书的作用的是
在程序运行时,如果将框架的______属性设为False,则框架的标题呈灰色,同时框架内的所有对象均被屏蔽,不允许用户对其进行操作。
对象是既包含数据又包含对______的方法,并将其封装起来的一个逻辑实体。
随机试题
激励包括三个基本因素:________、________、________。三要素相互联系,密不可分。管理者实施激励,要想方设法做好需要引导和目标引导,强化员工动机,刺激员工的行为,从而实现组织目标激励过程。
Youhavebeenbadlyinjuredinacaraccident.Itisnecessarytogiveyouabloodtransfusionbecauseyoulostagreatdealof
大椎可治外感发热,主要体现的是
下列情形中,不能免征契税的是()。
用于建设项目偿债能力分析的指标是()。
下列关于固定资产的说法正确的是()。
《三国演义》开篇称:“天下大势,分久必合,合久必分。”但是这句话未必准确,因为:
There’snothingsimpleaboutguncontrol,atangleoflegal,politicalandpublic-healthissuescomplicatedbyculturalpreferen
以下哪个选项定义了10个整型数构成的数组,数组元素为NewArray(1)至NewArray(10)
Beautyhasalwaysbeenregardedassomethingpraiseworthy.【R1】______Theyhavebettermarriagesandhavemorerespectableoccupat
最新回复
(
0
)