爲什麼該部門返回錯誤的剩餘部分？

這是VBScript中的一段簡單代碼，但未顯示預期輸出。它顯示值1兩次。它應該顯示3其餘的是三。我是否需要定義一個新變量以顯示準確的結果？爲什麼該部門返回錯誤的剩餘部分？

Dim a, b, c, d 

a = 5 
b = 2 
c = division(a, b) 
MsgBox "The division is zero" & " " & c 
d = division(a, b) 
MsgBox "The division is not zero" & " " & d 

Function division(a,b) 
    Dim Varinfn 
    Varinfn = a Mod b 
    If Varinfn = 0 Then 
    division = Varinfn 
    Else 
    division = Varinfn 
    End If 
End Function

來源

2016-04-10 Drasticdreamer Drasticity

你有兩個Msgbox。爲什麼這個代碼會顯示你的文字三次？ –

@Gosha_Fighten：不，它不會顯示結果三次。我需要顯示正確的結果。我使用了兩次消息框來顯示正確的答案。也許我應該這樣做，它會忽略錯誤的。 –

5 Mod 2的結果是1，因爲5 - （2 * 2）= 1。所以你的腳本顯示什麼是正確的。

來源

2016-04-10 11:51:47

爲什麼該部門返回錯誤的剩餘部分？

回答

相關問題