首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮;然后编写如下程序: Function fun(ByVal num As Long)As Long Dim k As Long k=1 num=Abs(num) Do Wh
在窗体上画一个命令按钮;然后编写如下程序: Function fun(ByVal num As Long)As Long Dim k As Long k=1 num=Abs(num) Do Wh
admin
2010-09-11
55
问题
在窗体上画一个命令按钮;然后编写如下程序:
Function fun(ByVal num As Long)As Long
Dim k As Long
k=1
num=Abs(num)
Do While num
k=k*(num Mod 10)
num=num\10
Loop
fun=k
End Function
Private Sub Command1_Click()
Dim n As Long
Dim r As Long
n=InputBox("请输入一个数")
n=CLng(n)
r=fun(n)
Print r
End Sub
程序运行后,单击命令按钮,在输入对话框中输入"345",输出结果为【 】。
选项
答案
60
解析
程序首先要求用户输入一个数,然后将这个数转化为长整型传递入函数fun。本题中传入的数字是345。函数fun中首先将传入的参数取绝对值,然后进入循环:
第一次循环结束的时候:
k=5
num=34
第二次循环结束的时候:
k=20
num=3
第三次循环结束的时候:
k=60
num=0
转载请注明原文地址:https://kaotiyun.com/show/HTmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序段:booleana=false;booleanb=true;booleanc=(a||b)&&(b);booleanresult=(a|b)&(b);执行完后,正确的结果是
下面程序段是从对象流中读取对象,请将程序补充完整。importjava.util.*;importjava.io.*;publicclassUnSerializaDate{Dated=null;UnSerializaDate(){tr
关系数据库管理系统能实现的专门关系运算包括选择、连接和______。
下面程序实现对zip文件file.zip的查询,在横线处填上正确的语句______。packagetest;importjava.io.*;importjava.util.*;impor
下列程序的输出结果是______。intx=3;inty=10;System.out.println(y%x);
下列对于关系运算的叙述中,正确的是______。
软件需求分析一般应确定的是用户对软件的()。
Swing的事件处理机制包括______、事件和事件监听者。
为了提高软件模块的独立性,模块之间最好是()。
下列适配器类中不属于事件适配器的是
随机试题
国际货币基金组织的职能有________、________、________、________、________。
夸美纽斯在《大教学论》中提出了()。
一项研究表明,那些在舒适环境里工作的人比在不舒适环境里工作的人生产效率高25%。评价工作绩效的客观标准包括承办工件数和工件的复杂程度。这表明:日益改善的工作环境可以提高工人的生产效率。以下哪项为真,最能削弱上述结论?()
甲于1992年3月5日犯A罪,该罪的法定最高刑为10年,1996年11月21日甲又犯B罪,B罪的法定最高刑为7年,那么A罪的追诉期限的结束时间应为()。
What’saman?Or,indeed,awoman?Biologically,theanswermightseemobvious.Ahumanbeingisa(n)【C1】______whohasgrownfr
若没有特殊声明,匿名FTP服务登录口令为()。
In1995about700,000robotswereoperatingintheindustrializedworld.Over500,000wereusedinJapan,about120,000inWe
NOTJUSTASHOP!Inhisyearlyreport,theChairmanofachainofretailoutletswritesaboutthefinancialaspectsofthe
TheLondonCentreForyourmeeting,productlaunch,specialeventPurpose-builtroomsLatestpresentationtechnologyFirst-class
A、Neitherofthemlikethewriter.B、BothofthemlikeEllaFitzgerald.C、Oneofthemiscrazyaboutwriting.D、ThemanlikesFi
最新回复
(
0
)