[填空題] 在窗體畫一個命令按鈕，然后編寫如下過程: Function fun(ByVal num As Long)As LoneDim k As Longk=
2021-07-20
[填空題] 在窗體畫一個命令按鈕，然后編寫如下過程: Function fun(ByVal num As Long)As LoneDim k As Longk=1 num=Abs (num) Do While num k=k*(num Mod 10) num=num10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Longn= InputBox (“請輸入一個數”)n=CLng (n)r=fun (n)Print r End Sub程序運行后，單擊命令按鈕，在輸入對話框中輸入234，輸出結果為 【12】 。
正確答案：X
詞條內容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域專業(yè)人士。