您好,登錄后才能下訂單哦!
VBS中怎么生成不重復隨機數(shù),很多新手對此不是很清楚,為了幫助大家解決這個難題,下面小編將為大家詳細講解,有這方面需求的人可以來學習下,希望你能有所收獲。
代碼如下:
dim Z(10),i for i=0 to 10 Z(I)=GetRnd(i-1) WScript.Echo (Z(i)) NEXT Function GetRnd(n) Dim i,X Randomize X=CInt(10*Rnd() ) For i=0 To n If X=Z(i) Then X=GetRnd(n) Exit For End If Next GetRnd=X End Function
看完上述內容是否對您有幫助呢?如果還想對相關知識有進一步的了解或閱讀更多相關文章,請關注億速云行業(yè)資訊頻道,感謝您對億速云的支持。
免責聲明:本站發(fā)布的內容(圖片、視頻和文字)以原創(chuàng)、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯(lián)系站長郵箱:is@yisu.com進行舉報,并提供相關證據(jù),一經查實,將立刻刪除涉嫌侵權內容。