首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: 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
20
问题
有如下程序:
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://jikaoti.com/ti/SJN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为:Form1的窗体上画一个名称为P1的图片框,并利用属性窗口把考生目录中的图标文件Open.ico放到图片框中;再画一个通用对话框控件,名称为CD1,利用属性窗口设置相应属性,即打歼对话框时:标题为“打开文件”,文件类型为“Word文档”,初始目录
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Ch1的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项,如图3-138(a)所示,单击“选中”按钮则把选中的项目移到List2中;单击“显示”按钮,则在Text1
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上建立一个名称为cmdArray的命令按钮数组,含3个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消”,每个按钮的高
设有下列语句:x=5Ifx>0Theny=1y=5程序运行后,则下列叙述中正确的是()。
在窗体上有两个文本框:Text1和Text2,然后编写如下事件过程:PrivateSubForm_Load()ShowText1.Text=“”:Text2.Text=“”:Yext2.SetFocusEnd
下列不属于需求分析阶段工作的是()。
在设计阶段,通过属性窗口为命令按钮的Picture属性装入一个图形,但没有显示,其原因是()。
下列说法中,错误的是
随机试题
(12—04)关于中国国际经济贸易仲裁委员会(C1ETAC)的表述,正确的是________。
对于应用甲氨蝶呤引起的巨幼红细胞性贫血,治疗时应选用
一声波波源相对媒质不动,发出的声波频率是v0。设以观察者的运动速度为波速的1/2,当观察着迎着波源运动时,他接收到的声波频率是()。
措施费是指为完成工程项目施工,发生于该工程施工前和施工过程中非工程实体项目的费用,一般包括的项目有( )。
可用于各级公路基层和底基层的粒料材料是()。
全陪的主要职责是()。
2007年,国家旅游局在全国范围内评定了首批5A级旅游区()处。
某县公安局城关派出所民警王某在执勤中,看到张某和刘某在激烈地争吵。上前了解情况后得知,张某认为刘某偷走了自己的钱包,便:要求刘某归还。刘某说自己并没有偷张某的钱包。王某见刘某衣着不整,便将其带回派出所。王某对刘某进行殴打,要求其交出张某的钱包,刘某仍然不承
______表示了对象间“ispartof”的关系。A.联合B.引用C.组合D.继承
Thefutureofbusinessliesnotinsellingproductsbutinsellingdreamsandemotions,accordingtoRolfJensen,directorofth
最新回复
(
0
)