首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Function fun(By Val num As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num k=k*(num Mod 10):num=num\10
有如下程序: Function fun(By Val num As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num k=k*(num Mod 10):num=num\10
admin
2019-04-29
17
问题
有如下程序:
Function fun(By Val num As Integer)As Integer
Dim k As Integer k=1
num=Abs(num)
Do While num
k=k*(num Mod 10):num=num\10
Loop
fun=k
End Function
Private Sub Form_Click()
Dim n As Integer,r As Integer
n=InputBox("请输入一个数:"):n=Int(n):r=fun(n):Print r
End Sub
程序运行后,单击窗体,在输入对话框中输入246,输出结果为
选项
A、120
B、48
C、24
D、60
答案
B
解析
在函数fun中会对传过来的参数num进行判断,如果不为0则进行循环,将各位数字乘到一起然后作为函数的返回值。
转载请注明原文地址:https://kaotiyun.com/show/HLUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在程序运行时,下面的叙述中正确的是()。
在窗体上有一个名称为Label1的标签和一个名称为Timer1的计时器,并编写有如下几个事件过程:PrivateSubFormLoad()Timer1,Enabled=FalseTimer1.Interval=_____
下列叙述中错误的是()。
数据库设计过程不包括
某二树有5个度为2的结点,则该二叉树中的叶子结点数是()。
下列说法中,错误的是
在满足实体完整性约束的条件下
假设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
软件测试的目的是()。
随机试题
中国共产党为总结经验教训,明确工作方向召开的“七千人大会”是在()
计算机传染病毒的可能途径是()。
患者李某,女性,30岁。咯血反复发作一个月,血色鲜红,咳呛气急,痰少质黏色黄,午后潮热,五心烦热,盗汗,口干多饮,颧红,消瘦,月经不调。舌红绛少津液,苔薄黄,脉细数。其治疗应首选的方剂是
地龙中具有溶解血栓作用的成分是迄今为止世界上最强的凝血酶特效抑制剂是
下列选项中可以作为评价行政活动合法性准则的有:()
甲于某晚9时驾驶货车在县城主干道超车时,逆行进入对向车道,撞上乙驾驶的小轿车,乙被卡在车内无法动弹,乙车内黄某当场死亡、胡某受重伤。后查明,乙无驾驶资格,事发时略有超速,且未采取有效制动措施(事实一)。甲驾车逃逸。急救人员5分钟后赶到现场,胡某因伤势过重
微分方程y’=2xy2的通解为()。
我国《票据法》规定,()不得更改,更改的票据无效。
某奶酪加工厂(一般纳税人),属于农产品增值税进项税额核定扣除试点范围企业。2014年6月期初库存鲜奶350升,期初平均购买单价为4元/升;当月又从农民手中购入鲜奶20000升,税务机关批准使用的收购凭证上注明收购金额为90000元。该加工厂当月生产奶酪20
Cigarettesmokingisagreathealth______andmayleadtofataldiseases.(2004年武汉大学考博试题)
最新回复
(
0
)