首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: DimFlagAs Boolean Private Sub Command1_Click( ) Dim intNumAs Integer intNum=In
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: DimFlagAs Boolean Private Sub Command1_Click( ) Dim intNumAs Integer intNum=In
admin
2018-09-29
67
问题
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:
DimFlagAs Boolean
Private Sub Command1_Click( )
Dim intNumAs Integer
intNum=InputBox("请输入:")
If Flag Then
Print f(intNum)
End If
End Sub
Function f(X as Integer)As Integer
If X<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。窗体的Mouse[Jp事件是松开鼠标时触发的事件。程序运行后,单击窗体,则全局变量Flag的值为True,然后单击命令按钮,在输入对话框中输入5,执行If分支语句,调用f函数,由于5<10,因此输出X,即输出5。
转载请注明原文地址:https://kaotiyun.com/show/NQFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面不能在信息框中输出"VB"的是( )。
阅读程序:OptionBase1PrivateSubForm_Click()DimArr(3,3)AsIntegerFori=1To3Forj=1To3
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypex aAsInteger bAsIntegerEndTypePrivateSubCommand1_Cli
下面可以作为VisualBasic的变量名的是
结构化程序设计的基本原则不包括( )。
某二叉树的中序序列为BDCA,后序序列为DCBA,则前序序列为
以下语句或子句中,符合VisualBasic语法要求的是
如果在Open语句中用Output方式打开一个含有数据的文件,则该文件中已有的数据
以下能对正实数的第3位小数四舍五入的表达式是()。
下面对对象概念描述正确的是
随机试题
亲子关系
简述消费者的权利。
A、主承托区B、副承托区C、缓冲区D、边缘封闭区E、后堤区处理不当,可引起上颌全口义齿翘动与压痛
A、头孢菌素类B、四环素类C、甲硝唑D、磺胺类E、氨基糖苷类属于繁殖期杀菌剂的药物是
王某委托某律师代为申请专利,后王某不幸遇交通事故死亡,王某与该律师之间的委托代理关系随即终止。()
人们通常把知识分子家庭称作“书香门第”,这里的“书香”原意指的是:
常用的虚拟存储寻址系统由( )两级存储器组成。
线性表的顺序存储结构和线性表的链式存储结构分别是
OnehundredandthirteenmillionAmericanshaveatleastonebank-issuedcreditcard.Theygivetheirownersautomaticcreditin
"ItwasthebeginningofarevolutioninAmericaandtheworld,arevolutionthatsomehaveyettoacknowledgeandmanyhaveyet
最新回复
(
0
)