47.( )甲校18位男同學與乙校18位女同學準備到陽明山進行聯誼活動，若男同學們打算以抽籤的方式（籤為1~18）來決定每人要騎摩托車載哪一位女同學上山。假設使用Visual Basic的Rnd( )函數可產生不重複的亂數，請問重複執行下列哪一個敘述可模擬上述抽籤的動作？
(A)MsgBox(Math.Sqrt(9) * Rnd() * 2)
(B)MsgBox(Rnd() * 18)
(C)MsgBox(Rnd() * Int(-18.2) * -1)
(D)MsgBox(Int(Rnd() * 18) + 1)。