首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下程序: 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=nu
在窗体上画一个命令按钮,然后编写如下程序: 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=nu
admin
2010-09-11
48
问题
在窗体上画一个命令按钮,然后编写如下程序:
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/1Pmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于队列的叙述中,正确的是______。
在待排序的元素序列基本有序的前提下,效率最高的排序方法是______。
编译JavaApplet源程序文件产生的字节码文件的扩展名为______。
下列描述中,错误的是()。
下列关于System类的叙述中,错误的是( )。
在长度为n的有序线性表中进行二分查找。最坏的情况下,需要的比较次数为【】。
数据结构分为逻辑结构与存储结构,线性链表属于【】。
给出下面程序的代码:byte[]array1,array2[];bytearray3[][];byter[][]array4;下列数组操作语句中不正确的是( )。
线性表若采用链式存储结构时,要求内存中可用存储单元的地址【】。
软件工程研究的内容主要包括:【】技术和软件工程管理。
随机试题
国际民事诉讼法
(2007年)当RLC串联电路发生谐振时,一定有()。
下列选项中,符合给排水采暖、燃气管道安装工程的定额工程量计算规则的有()。
在某一价位附近,( )决定了对股价运动的支撑和压力。
根据支付结算法律制度的规定,下列存款人不得开立基本存款账户的是()。
情绪是婴幼儿交往的主要工具,这是因为情绪具有
如下图所示,梯形ABCD的上底与下底分别为4和8且其面积为54,E为AC和BD的交点,则三角形AME的面积为()。
“三个代表”重要思想全面体现党的()。
将数据项“Student”添加到名称为Listl的列表框中,并使其成为列表框第一项的语句为
Inrecentyears,railroadshavebeencombiningwitheachother,mergingintosupersystems,causingheightenedconcernsaboutmo
最新回复
(
0
)