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

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

二级VB

NCRE全国计算机二级

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