( )23. 執行下列 Visual Basic 程式，LCM (17, 51) 結果為何?
(A)867
(B) 17
(C) 3
(D) 51

```vba
Private Function LCM(ByVal num1 As Integer, ByVal num2 As Integer) As Integer
Return (num1 * num2 / GCD(num1, num2))
End Function
Private Function GCD(ByVal num1 As Integer, ByVal num2 As Integer) As Integer
Dim min, max, maxModMin As Integer
min = Math.Min(num1, num2)
max = Math.Max(num1, num2)
maxModMin = max Mod min
Return If(maxModMin > 0, GCD(min, maxModMin), min)
End Function
```