首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Function fun(ByVal hum As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num
有如下程序: Function fun(ByVal hum As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num
admin
2020-01-02
46
问题
有如下程序:
Function fun(ByVal hum 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/KhTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。PrivateSubCommand1Cliek()D
当窗体大小改变时,要使其中的控件也按比例发生变化,应使用窗体的()。
在窗体上有一个文本框Text1,Text属性值为空,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsInteger
E—R图中用来表示实体的图形是()。
设有如下声明语句OptionBase1Dimarr(2,一1To5)AsInteger则数组arr中数组元素的个数是()。
下面对软件测试描述错误的是()。
下面关于算法的叙述中,正确的是()。
与数学式子对应的VisualBasic表达式是
在窗体上有1个名为Cd1的通用对话框,为了在运行程序是时打开保存文件对话框,险则在程序中应使用的语句是
随机试题
大米加工精度越高,粒面留皮越少。
下列有关信息安全的叙述,不正确的是()
下列措施中,属于电梯井道施工的安全技术措施有()。
从企业名称“杭州威风化工有限公司”,跟单员可以准确地得到下列哪些信息()
对个人销售额未达到起征点的免征增值税,销售应税劳务的起征点为( )。
整批购置资产随销售收入的增长呈()。
春秋战国及秦汉时期最具影响力的文学家是()。
大理是阳光的、美的、慢的、自由的、丰富的,宜居、宜游、宜闲。它不仅容纳了很多人,也_________了很多人。苍山洱海之间,古朴人心之中,能见自己、见天地与见众生;它的闲与和谐,在中国_________。填入划横线部分最恰当的一项是:
Thefarmerwasgettingbetterandbetteraftertakingthemedicinethatthedoctorgavehim.Thefarmerwasverymean(吝啬的)and
ThemodernskyscraperAoriginatedinthenineteenthcentury,andmanyBtechnologicalimprovementsCcontributedtoitsDdevelop.
最新回复
(
0
)