首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下程序: Function fun (ByVal num As Long) As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num\10) num=nm\1
在窗体上画一个命令按钮,然后编写如下程序: Function fun (ByVal num As Long) As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num\10) num=nm\1
admin
2010-01-05
46
问题
在窗体上画一个命令按钮,然后编写如下程序:
Function fun (ByVal num As Long) As Long
Dim k As Long
k=1
num=Abs(num)
Do While num
k=k*(num\10)
num=nm\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)
MsgBox r
End Sub
程序运行后,单击命令按钮,在输入对话框中输入234,消息框显示的结果为【 】。
选项
答案
0
解析
程序将输入的内容234转变为长整型传入函数fun中,然后进入循环。
循环第一次结束的时候:k=23 num=23
循环第二次结束的时候:k=46 hum=2
循环第三次结束的时候:k=0 num=0
转载请注明原文地址:https://kaotiyun.com/show/6hwp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
对C++编译器区分重载函数无任何意义的信息是()。
下列程序执行后,输出的结果是()。intx=-5,y=0;while(++x)y++;cout<<y<<eladl;
在长度为n的有序线性表中进行二分查找,最坏情况下需要比较的次数是()。
下列字符串中,正确的C++标识符是()。
执行下列语句段后,输出字符"*"的个数是()。for(inti=50;i>1;i-=2)cout
使用VC6打开考生文件夹下的源程序文件modi2.cpp。阅读下列函数说明和代码,补充空出的代码。程序的功能是寻找1~500以内的亲和数并显示出来,函数amicableNum(intm,intn)判定两个数是否是亲和数。亲和数的定义为:两个数
在数据库设计中,将E—R图转换成关系数据模型的过程属于()。
有表示公司和职员及工作的三张表,职员可在多家公司兼职。其中公司C(公司号,公司名,地址,注册资本,法人代表,员工数),职员S(职员号,姓名,性别,年龄,学历),工作W(公司号,职员号,工资),则表W的键(码)为
有如下程序:#includeusingnamespacestd;classGoods{//货物类doubleunit_price;//单价intquantity;//数量public:
在VisualFoxPro的查询设计器中【】选项卡对应的SQL短语是WHERE。
随机试题
下列土的物理力学性质指标中,通过试验测定指标换算得出的是()。
防火墙是()
简述美育的任务。
患者,男性,8岁,平素学习中等。最近一段时间老师发现其上课时经常愣神,当时似认真听讲,但提问时根本不知道。其脑电图的表现哪一种可能性大患者,男性,33岁,癫癎病史,自述一天前出现从左侧拇指沿腕部、肘部至肩部、下肢抽搐,持续约2分种缓解,一天来发作5次,
致病性大肠杆菌肠炎侵袭性大肠杆菌肠炎
上海磁悬浮列车线是世界上第一条投入商业运行的磁悬浮线路,设计时速460公里。()
0,1,1,3,5,()。
混合痔是指
IEEE802.11b定义了使用跳频扩频技术的无线局域网标准,它的最高传输速率可以达到【】Mbps。
A、 B、 C、 D、 E、 B
最新回复
(
0
)