我知道用Rnd()的方法了
不過若是要用一個Function回傳亂數
然後做四次 四次的亂數都不重複 那要怎麼寫???
Function N(Byval a as Integer)As Integer
Dim c = RandomNo.Next(1, 10)
Return c
End Function
這是我寫的Function程式
但是要判斷有無重複就做不出來了....
有大大可以幫幫我嗎?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.59.230.184