首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Function fun(ByVal nuin As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do Wbile num k=k*(nu
有如下程序: Function fun(ByVal nuin As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do Wbile num k=k*(nu
admin
2020-04-18
28
问题
有如下程序:
Function fun(ByVal nuin As Integer)As Integer
Dim k As Integer k=1
num=Abs(num)
Do Wbile 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/XuTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面不能正确计算1+(1+2)+(1+2+3)+…+(1+2+…+10)的是
下面关于菜单的叙述中正确的是
在数据库设计中,将E-R图转换成关系数据模型的过程属于()。
以下能够正常结束循环操作的程序段是
下面描述中错误的是()。
现有表示患者和医疗的关系如下:P(P#,Pn,Pg,By),其中P#为患者编号,Pn为患者姓名,Pg为性别,By为出生日期,Tr(P#,D#,Date,Rt),其中D#为医生编号,Date为就诊日期,Rt为诊断结果。检索在1号医生处就诊的病人姓名的表达式是
使用Line控件在窗体上画一条从(0,0)到(600,700)的直线,则其相应属性的值应是( )。
下列说法中正确的是
以下说法中正确的是
随机试题
患者,女,35岁。舌部疼痛、烧灼感3天,半年前上下唇内侧疼痛,局部涂药后好转。检查:舌尖及右侧舌缘处有米粒大小、圆形溃疡各1个,表面有浅黄色假膜,周围有红晕,触痛明显。最可能的诊断是
下列传染病采取甲类传染病预防、控制措施的是
A.引起嗜睡B.致使视力模糊C.致使定向力障碍D.引起多尿或多汗E.致使眩晕或幻觉驾驶员应慎用双氯芬酸的原因是()。
共8题。每题的备选项中,只有1个最符合题意。某企业年销售产品收入为3600万元,企业销售利润率为10%,其信用条件是:2/10,n/30,享受现金折扣的客户占40%,其余在信用期内付款。管理成本占销售收入的1%,坏账损失占销售收入的2%,收账费用占销售收
对个人住房贷款合作机构进行分析的要点包括()。
我国法律法规规定的小学生的睡眠时间是()。
社会治安综合治理的规范建设,就是要抓紧整顿建设好办事机构和城乡基层组织。()
生态补偿是在经济社会发展中对生态功能和质量所造成损害的一种补助,其目的是提高受损地区的环境质量或者用于创建新的具有相似生态功能和环境质量的区域。生态补偿在原则上适用谁破坏谁补偿。根据上述定义,下列属于生态补偿的是:
运行程序:AA=0FORI=2TO100STEP2AA=AA+IENDFOR?AARETURN该程序得到的结果为()。
HowtoapproachReadingTestPartOne•InthispartoftheReadingTestyoumatcheightstatementswithfiveshorttexts.•Fir
最新回复
(
0
)