先在窗体上添加一个命令按钮,然后编写如下程序: Function fun(ByValnum As Long)As Long Dim k As Long k=1 num=Abs(nam) Do W

admin2010-11-20  43

问题 先在窗体上添加一个命令按钮,然后编写如下程序:    Function fun(ByValnum As Long)As Long        Dim k As Long        k=1        num=Abs(nam)        Do While num          k=k*(num Mod 10)          num=num\10        Loop        Fun=k        End Function    PrivateSubCommandl_Click

选项 A、0     
B、100
C、200     
D、300

答案A

解析
转载请注明原文地址:https://jikaoti.com/ti/tUg0FFFM
0

最新回复(0)