کمک در مورد ساختن تعدادی عدد تصادفی

[Usefi]

سلام و عرض ادب
من میخوام برنامه ای بنویسم که شه باهاش کدهای تصادفی بدون تکرار ساخت . قبلا نمونه اوپن سورسشو دیده بودم اما نمیدونم کجا . ممنون میشم دوستان راهنمایی بفرماین .

 

[Mamylo]

درود، دوست گرامي
خودم اينجوري استفاده مي کنم، حالا باز ببينم دوستان راه ديگه اي دارن يا نه:

Private Sub Form_Load()
   Call Randomize Timer
   [B]Num = int(Rnd * 100)[/B]
End Sub

اون خط بولد شده رو هرجا بذارين توي Num يه عدد تصادفي از صفر تا صد مي ده بهتون

در پناه اهورامزدا باشيد، بدرود