首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画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
31
问题
在窗体上画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全国计算机二级
相关试题推荐
以下能够正常结束循环操作的程序段是
设:a=12,b=5,c=7,表达式x=(a\c+aModb)+Int(13/5)的值是( )。
在窗体上画一个名称为Text1的文本框,再建立一个名称为Option1的控件数组(含3个单选按钮,标题分别为宋体、黑体、仿宋,下标从0开始),并编写如下程序代码:PrivateSubOption1_Click(IndexAsInteger)
某二叉树共有13个结点,其中有4个度为1的结点,则叶子结点数为
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,
计算机软件包括
在程序中发现有语句:Put#1,2,num并且能够正确执行,因此可以判断
如果希望向一个顺序文件写入数据,但又要保留文件中的原有内容,应采取的文件打开方式是
执行PrintFormat$(0.2576,"00.0%")后,输出结果是
在学生管理的关系数据库中,存取一个学生信息的数据单位是
随机试题
论述朱自清散文的题材类型和主要艺术特色。
—DoyouthinkJoshuaistherightpersonforthisjob?—Heiswell-groundedineconomictheory,butlacks______inproductionmana
血浆胶体渗透压来自白蛋白的占总胶体渗透压的
A、牙齿萌出迟缓,乳牙滞留,牙列发育不良,釉质基质形成及钙化受阻B、佝偻病C、唇炎、口角炎、舌乳头肥厚或裂底,牙齿、颌面生长停滞D、水痘E、坏血病维生素B缺乏可引起
发现心包积液最简便准确的方法是
受托投资管理业务的管理风险有()。
下列税收程序法的主要制度中,体现公正原则的有()。(2011年)
()
Youshouldspendabout20minutesonQuestions1-13,whicharebasedonReadingPassage1below.OttersAOttersaresemiaquatic
Completethetablebelow.WriteNOMORETHANTWOWORDSforeachanswer.
最新回复
(
0
)