首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Function fun(ByVal sum As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While sum k=k*(hum Mod 10):sum=sum\10 L
有如下程序: Function fun(ByVal sum As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While sum k=k*(hum Mod 10):sum=sum\10 L
admin
2020-01-02
46
问题
有如下程序:
Function fun(ByVal sum As Integer)As Integer
Dim k As Integer k=1
num=Abs(num)
Do While sum
k=k*(hum Mod 10):sum=sum\10
Loop
fun=k
End Function
Private Sub Form Click()
DiIn n As Integer,r As Integer
n=InputBox(“请输入一个数:”):n=Int(n):r=fun(n):Print r
选项
A、120
B、48
C、24
D、60
答案
B
解析
在函数fun中会对传过来的参数num进行判断,如果不为0则进行循环,将各位数字乘到一起然后作为函数的返回值。
转载请注明原文地址:https://kaotiyun.com/show/1ITp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在程序运行时,下面的叙述中正确的是()。
算法的时间复杂度是指()。
下列程序段的执行结果为()。x=Int(Rnd+4)SelectCasexCase5:Print"AClass"Case4:Print"BClass"Case3:Print"CClass"
(1)在名称为Form1的窗体上添加两个名称分别为Frame1、Frame2的框架,标题分别为“字号”、“修饰”;在Frame1中添加两个单选按钮,名称分别为Option1、Option2,标题分别为“10号字”、“20号字”,且标题显示在单选按钮的左边;
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
以下关于过程的叙述中,错误的是
关于KeVPress事件,以下叙述中正确的是
设窗体上有一个名称为HSl的水平滚动条,如果执行了语句:HS1.Value=(HS1.Max—HS1.Min)/2+HS1.Min则:
E—R图中用来表示实体的图形是()。
随机试题
唐氏综合征患儿染色体核型标准型为
下列员工福利中,不属于法定福利的是()。
某投资者购买了执行价格为25元、期权价值为4元的看涨期权合约,并卖出执行价格为40元、期权价值为2.5元的看涨期权合约。如果该期权的原生资产的价格在到期时上升到50元,并且在到期日期权被执行,那么该投资者在到期时的净利润为(忽略交易成本)()
李某决定于2006年11月购买一套普通住房自住,经估价该住房市场价格为100万元。李某准备向银行申请个人住房公积金贷款。李某的住房公积金账户本息余额为20000元,李某在10月份缴纳的住房公积金为250元,其单位缴纳的比例与职工相同。李某离法定退休年龄还有
《百家讲坛》栏目主要靠主讲人讲,体现的主要教学方法是()。
双榆树东里社区是一个老旧社区,有楼房33栋,居民3163户,居民代表72名。社区居民委员会通过民主决策规范社区公益金使用流程,实行社区活动和服务项目化管理:(1)了解居民服务需求;(2)研提社区公益金使用方案;(3)召开居民会议讨论通过使用方案;(4>社区
有人说。做事情要先想再干,有人说,要边干边想,有人说,要先干再想,说说你的看法,你认为哪种说法最好?
下列选项能够描述图中物理现象的是:
清末司法改革,在诉讼程序上实行()。
Theslogan"scientifictruthisamatterofsocialauthority"hasbecomedogmatomanyacademicinterestgroupswhohavebeen__
最新回复
(
0
)