2. 计算机
  3. 在窗体上画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为 ______。 Function fun(ByVal num As Long) As Long Dim k As Long k=1

在窗体上画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为 ______。 Function fun(ByVal num As Long) As Long Dim k As Long k=1

admin2013-04-11  52
问题 在窗体上画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为 ______。    Function fun(ByVal num As Long) As Long    Dim k As Long    k=1    mum=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
选项 A、20
B、24
C、9
D、28
答案2
解析 此程序的功能是对输入的整数在fun函数巾求出其每位数字的积，循环结构的作用是对传来的数据进行位数的分解，分别得到个位、十位、百位等的数字，再将其累乘到变量k中，并把k的值作为函数的返回值，因此234的3位数字相乘的结果是24。
转载请注明原文地址:https://kaotiyun.com/show/H2Qp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)