首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Function Fun(x) y=0 If x
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Function Fun(x) y=0 If x
admin
2015-06-30
20
问题
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:
Function Fun(x)
y=0
If x<10 Then
y=x
Else
y=y+10
End If
Fun=y
End Function
Private Sub Command1_Click()
n=InputBox("请输入一个数")
n=Val(n)
P=Fun(n)
Print P
End Sub
运行程序,单击命令按钮,将显示输入对话框,如果在对话框中输入100,并单击"确定"按钮,则输出结果为( )。
选项
A、10
B、100
C、110
D、出错信息
答案
A
解析
程序中输入100,则调用过程为Fun(100),过程Fun中判断参数是否小于10,小于10则将此值赋给y,如果不小于10,则变量y值加10,由于100不小于10,所以y值加10,等于10,并将此值做为函数值返回。因此输出结果为10。
转载请注明原文地址:https://kaotiyun.com/show/PVQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOutputAs
VisualBasic根据计算机访问文件的方式将文件分成3类,其中不包括()。
在窗体上有一个文本框Text1,Text属性值为空,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsIntegerstr=UC
执行下面程序,第一行输出结果是【】,第二行输出结果是47。OptionExplicitPrivateSubForm_Click()DimAAsIntegerA=2
以下叙述正确的是()
当VB执行下面语句后,A的值为()A=1IfA>0ThenA=A+1IfA>1ThenA=0
若结点的存储地址与其关键字之间存在某种映射关系,则称这种存储结构为______。
两个或两个以上模块之间联系的紧密程度称为()。
在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在下列横线处合适的语句是()。PrivateSubForm_Cli
设有整型变量s,取值范围为0~100,表示学生的成绩。有如下程序段:IfS>=90ThenLevel=“A”ElseIfs>=75ThellLevel=“B”ElseⅡs>=60ThenLevel=“C”ElseLevel=“D
随机试题
女,27岁。已婚未孕,月经紊乱2年。妇检,宫颈光滑,子宫正常大小,双附件无异常。诊刮结果为子宫内膜中度不典型增生,应选择哪项处理
关于移植器官保存方法的描述,不正确的是()。
A.心中B.胸中C.肺中D.腹中E.脑中
A、茜草科B、瑞香科C、豆科D、毛茛科E、木通科呜血藤来源于
英译汉“stipulation of contract;supervision and administration”,正确翻译为( )。
甲公司为一家运输公司,2006年1月成立之初拥有载货汽车50辆,每辆自重15吨。2007年3月将其中的9辆汽车租给A公司使用,9辆汽车的总价值为1800000元,双方签订租赁合同。租金为每月6000元。当地规定载货汽车车船税每年每吨税额为30元。
在原始社会,人们唱歌、跳舞,但是不写诗,因为那时候没有文字。同理,史前时代的人也演剧,而且有文字之后多数中国戏剧演员并不识字,戏剧演出主要是以口传心授的方式传承与传播的。然而长时间以来,人们陷入了文字与文献崇拜的陷阱不能自拔,乃至文献考据一直成为文学史、戏
设总体X具有概率密度:从此总体中抽得简单样本X1,X2,X3,X4,求的密度fT(t)。
在C++语言中,打开一个文件就是将这个文件与一个什么建立关联?
Whydon’tbirdsgetlostontheirlongflightsfromoneplacetoanother?Scientistshavepuzzledoverthisquestionformanyye
最新回复
(
0
)