[VBA]關於亂數與VBA語法的問題

大家好，最近小弟開始學VBA

在練習一些題目時遇到2個問題

剛好發現此版，希望版上有大大能不吝賜教，謝謝!

第一個問題
因為用EXCEL2013版
用WorksheetFunction.RandBetween()
在EXCEL2003版不適用
於是用Int(Rnd() * (Max - Min + 1))改寫後
發現亂數產生蠻固定的，大概每4~5個亂數就重新循環一次
但用WorksheetFunction.RandBetween
並無此問題!
不知版上大大有沒有遇過這個問題?
以下為擷取一段原始碼
Dim PlayerNum, Min As Integer, Max As Integer, GameTimes As Integer,
GameTimeSet As Integer ', FinalCode As Integer
If Min >= Max Then '輸入錯誤時
    MsgBox "請注意有無輸入錯誤，再重新點選開始遊戲", vbInformation
    Exit Sub
Else '輸入正確
    FinalCode = WorksheetFunction.RandBetween(Min, Max)
    '在EXCEL2003使用Int(Rnd() * (Max - Min + 1))
    'MsgBox FinalCode
End If

第2個問題是":="與"="兩者的差別?
原本寫TYPE=1，發現會有問題!
於是上網查詢之後，改成TYPE:=1，便能正常執行
EX:
PlayerNum = Application.InputBox("請猜測終極密碼", "終極密碼", "EXIT",
Type:=1 + 2)

--
※ 編輯: hink2003 (175.183.8.144), 06/26/2016 20:28:22
→ MOONRAKER: :=只有用在指明引數名稱的函數呼叫裡面 其他地方沒用
→ MOONRAKER: 你以上的用法便是 這個場合也不可換成 =
→ hink2003: 謝謝M大回覆!不知第一個問題有沒有人遇過!?
→ Catbert: 呼叫Rnd前要加入Randomize MSDN:https://goo.gl/sGDe54
→ Catbert: 另外可用Application.Version來判斷Excel版本
感謝C大分享，收穫甚多!
※ 編輯: hink2003 (175.183.8.144), 07/02/2016 19:32:28