首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画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-02-27
24
问题
在窗体上画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_MouselJp(Button As Integer,ShiR 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/cjTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Form1,标题为“图片”的窗体上添加1个名称为Image1的图像框,其高为2500,宽为2000。请通过属性窗口设置适当属性,将考生文件夹下的图片文件pic1.jpg插入图像框,并使图片自动通应图像框的大小(如图所示)。注意:存盘时必须存
在考生文件夹下有一个工程文件sjt5.vbp,功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)
以下可作为VisualBasic合法变量名的是
在表达式2+3*4^5-Sin(x+1)/2中,首先进行的运算是()。
以下叙述中错误的是()。
以下能够设置控件焦点的方法是( )。
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:PrivateSubCommandl_Click()x=0doWhilex<50x=(x+2)
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为( )。
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是( )。
下面的数写成普通十进制数是()。2.65358979335278D-6
随机试题
患者,男性,31岁。持续性头痛6天。自觉后枕部紧箍样疼痛,无恶心、畏光和畏声。查体:T36.5℃,BP120/70mmHg,眼压无异常,张口颞颌关节无异常。脑部MRI无异常。最可能的诊断是
退行性骨关节病关节面下透光区引起的原因是
甲国某航空公司国际航班在乙国领空被乙国某公民劫持,后乙国将该公民控制,并拒绝了甲国的引渡请求。两国均为1971年《关于制止危害民用航空安全的非法行为的公约》等三个国际民航安全公约缔约国。对此,下列哪一说法是正确的?(2013年卷一第33题)
调整工程网络计划时,调整内容一般包括()。
下列关于股票期权投资策略的说法中,不正确的是()。
企业摊销无形资产时,可能借记的会计科目有()。
有关密码管理,下列说法错误的是()。
阅读下面程序:#include<iostream.h>fun(inta,intb){intc;c=a+b:returnC;)voidmain(){intx=6,y=7,z=8,r;r=fun((x--,y++,x+y),z-
HappyLand,abigfamilyrestaurant______theregionfortenyears,iscurrentlyofferinga20percentdiscount.
Ilovetravelingbytrain.Fast【B1】______slowlocaltrainswhichstopsateverystation,【B2】______trainstakingbusinessmen
最新回复
(
0
)