首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下程序: Function fun(ByVal num As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=
在窗体上画一个命令按钮,然后编写如下程序: Function fun(ByVal num As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=
admin
2009-03-15
67
问题
在窗体上画一个命令按钮,然后编写如下程序:
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=O
转载请注明原文地址:https://kaotiyun.com/show/SH1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请完成下列Java程序:创建一个具有2行3列的GridLayout管理器,包括Choice,Label,Button构件,布局为第1行包括一个Choice构件(包括2个选项item1和item2),一个Label构件(当选择Choice构件中的选项时,La
下面的程序是用do_while语句计算10的阶乘。请在程序的每条横线处填写一个语句,使程序的功能完整。注意:请勿改动main()主方法和其他已有的语句内容,仅在横线处填入适当的语句。源程序文件代码清单如下:publicclass
下列程序建立一个file.dat的文件,并且允许按照不同的数据类型向里面输入数据,请将程序补充完整。注意:不改动程序结构,不得增行或删行。packagech3;importjava.io.*;publicclassT
下列数据类型转换,必须进行强制类型转换的是()
面向对象设计时,对象信息的隐藏主要是通过______实现的。()
从工程管理的角度来看,软件设计分两步来完成。首先是概要设计,然后是【】。
软件工程概念的出现源自【】。
一个关系数据库文件中的各条记录()。
子类可重写父类的方法,重写时必须遵循的原则()
生成StringBuffer一个对象后,还可用【】方法或ensureCapacity()方法来设定缓存大小。
随机试题
下列属于蝶式套利的有()。Ⅰ.在同一交易所,同时买入10手5月份白糖合约、卖出20手7月份白糖合约、买入10手9月份白糖合约Ⅱ.在同一交易所,同时买入40手5月份大豆合约、卖出80手5月份豆油合约、买入40手5月份豆粕合约Ⅲ.在同
升降式止回阀的弹簧的()降低后,会造成阀门关闭不严。
使儒学神学化并逐渐宗教化的人是
治疗颞下颌关节强直引起的开口困难可选用
下列施工质量控制的依据中,属于专门技术法规性依据的是()。
8名学生和2位老师站成一排合影,2位老师不相邻的排法种数为()。
在合作教学法中,教师扮演的角色包括()
有关行纪合同,下列说法中正确的是()。
MsByron’scommentonherownsummerexperimentis______.ElliotCohenismentionedinthetextsoasto______.
FiveMythsaboutCollegeDebt[A]Thetrillion-dollarstudentdebtburdenhascausedmanydebatesaboutthevalueofcollege.
最新回复
(
0
)