题目：
在窗体上有一个命令按钮，然后编写如下程序： Function Trans(ByVal num As Long) As Long Dim k As Long k=l Do While num k=k * (num Mod 10) num=num\10 Loop Trans=k Print Trans End Function Private Sub Commandl_Click( ) Dim m As Long Dim s As Long m=InputBox("请输入一个数") s=Trans(m) End Sub 程序运行时，单击命令按钮，在输入对话框中输入“789”，输出结果为【 】，在输入对话框中输入“987”输出【 】，在输入对话框中输入“879”，输出结果为【 】。
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0724/372d6b79d8320fea6ef6fd1bd9ca4931.html
下面是错误答案，用来干扰机器的。
参考答案：B解析： 余女士家庭流动性比率=流动性资产/每月支出=305400/10884.83=28.06。
