易語言自帶的取隨機數，取小范圍的數字還行，大了就不行了，后面的根本取不到，所以我們需要借且JS來取隨機數
1、啟動易語言新建一個空白的程序或者模塊都可以
2、雙擊界面，進入代碼編輯，在代碼界面新建一個子程序，修改為子程序_取隨機數_JS
3、讓鼠標指針放在上面，按回車添加2個整數型參數，分別命名為【起始值】【終止值】
4、可以把公開勾上，這樣可以復制到模塊里面進行調用。第一個參數【起始值】設置為可空，如果沒有傳入參數，默認就是為0
5、添加其他JS代碼，完成編寫，純代碼在最后，直接復制到易語言界面可以直接調用
6、測試功能是否正確。OK，此代碼即使是上百萬上千萬的隨機，也能取到，不像易語言的隨機取不到后面的。
純代碼為：
.版本 2.子程序 子程序_取隨機數_JS, 整數型, 公開.參數 起始值, 整數型, 可空.參數 終止值, 整數型.局部變量 Js, 對象.局部變量 結果, 整數型CoInitialize (0) ' 初始化COM對象，多線程調用才不會失敗Js.創建 (“ScriptControl”, )Js.寫屬性 (“Language”, “JScript”).判斷開始 (起始值 ＝ 0) 結果 ＝ 到整數 (Js.文本方法 (“eval”, “parseInt(Math.random()*(” ＋ 到文本 (終止值) ＋ “+1),10)”)).判斷 (起始值 ＝ 1) 結果 ＝ 到整數 (Js.文本方法 (“eval”, “parseInt(Math.random()*” ＋ 到文本 (終止值) ＋ “+1)”)).默認 結果 ＝ 到整數 (Js.文本方法 (“eval”, “parseInt(Math.random()*(” ＋ 到文本 (終止值) ＋ “-” ＋ 到文本 (起始值) ＋ “+1)+” ＋ 到文本 (起始值) ＋ “,10)”)).判斷結束Js.清除 ()CoUninitialize () ' 清除返回 (結果)
新聞熱點
疑難解答
