首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序: Function Fun(X) y=0 If X
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序: Function Fun(X) y=0 If X
admin
2013-11-29
50
问题
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:
Function Fun(X)
y=0
If X<10 Then
Y=x
Else
Y=Y十10 End If
Fun=v
End Function
Private Sub CommandI_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,等于lO,并将此值做为函数值返回。因此输出结果为10。
转载请注明原文地址:https://kaotiyun.com/show/HXQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为计算a“的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLongDimPAsLongP=aFork=lT0nP=P*aNextkp
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:optionBase1PdvateSubCommandl_Click()Dimaa=Array(1,2,3,4)J=1Fori=3To1Step-1s=s+a(
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePersonnameAsString*8mjotAsString+
执行下列语句s~Input=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是
(1)在名称为Forml的窗体中画一个名称为Textl的文本框,其标题为“0”;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程.使得在运行时,每隔1秒钟文本框中的数字加1,当达到10时,在窗口上打印“10”,然后重新从O开
(1)在名称为Forml的窗体上画一个名称为Textl的文本框,其高、宽分别为600、1800。请在属性框中设置适当的属性满足以下要求:Text1的字体为“隶书”,字号为“三号”;窗体的标题为“字体大小”,不显示最大化按钮和最小化按钮,如图4
(1)在Forml的窗体上绘制一个图片框,其名称为Picturel。编写适当的事件过程,使程序运行后,若单击窗体,则从图片框的(300,600)位置处开始显示“VisualBasic’’。程序运行情况如图36—1所示。注意:程序中不得使用任何变
随机试题
人们花钱购买名牌产品时,不是为了产品的质量,而往往是为了品牌的名声,希望通过品牌的名气提高自己的身份。某企业就是要靠其名牌产品“独一无二”的魅力来保持其销售额的不断增长。以上所述。最能支持以下哪项结论?
男性,21岁,因饱餐后活动,突感中腹部剧烈疼痛,阵发加重,伴呕吐,未排气、排便,查体:腹部隆起,压痛明显,肠鸣音亢进。最可能的诊断是
患者胁肋胀痛,走窜不定,甚则引及胸背肩臂,疼痛每因情志变化而增减,胸闷腹胀,嗳气频作,得嗳气而胀痛稍舒,纳少口苦,舌苔薄白,脉弦。治宜选用
关于真性红细胞增多症的叙述,下列正确的是( )
皮肤病发生迅速,骤起骤退,游走不定,泛发全身或多发于头部,皮肤干燥,脱屑,瘙痒,为何病因引起
女,30岁,低热、腹胀、腹痛1个月。查体:腹部弥漫压痛,揉面感,移动性浊音阳性,对诊断最有意义的检查是
医疗机构发现法定传染病疫情或者发现其他传染病爆发,流行时,其疫情报告应当遵循的原则是
下列关于业务实施过程相关规定的表述中,正确的有()。
第一次业主大会筹备组自成立之日和业主委员会自选举产生之日起()内将相关的材料报物业所在地、县人民政府房地产行政主管部门备案。
AnairlinertravellingfromLondontoNewYorkmaytakefromfivetofifteenhourstocrosstheAtlantic,whileaspacecapsule
最新回复
(
0
)