تولید اعداد ده بیست رقمی

[رامین مرادی]

سلام دوستان
من تولید اعداد هفت هشت رقمی رو می تونم تولید کنم فقط یه مشکل بزرگ وجود داره مثلا برای 7 رقمی حدود 7-8 دقیقه طول می کشه برای 8 رقمی فکر کنم چیزی بیشتر از 15 دقیقه . !!!!:متعجب:

من از حلقه های تو در تو استفاده می منم به این صورت که مثلا برای اعداد 7 رقمی 7 تا حلقه دارم که تمام اعداد 7 رقمی رو تولید می کنه چیکار کنم که برای اعداد تا 100 رقمی:لبخند: مشکل زمان نداشته باشم اگه 100 رقمی هم نشد تا 30 رقم هم کفایت می کنه اگه روش خاصی مد نظرتون هست بگید ممنون می شم:لبخند:

[بهروز عباسی]

درود دوست گرامی
این تابع یه مقدار رشته ای 20 کاراکتری از اعداد به طو ر تصادفی تولید می کند
برای استفاده از اعداد این رشته Val(random) استفاده کن


Private Function random() As String
Randomize Time
For i = 1 To 20
random = random & Chr((Int((Asc(9) - Asc(0) + 1) * Rnd + Asc(0))))
Next
End Function
Private Sub Form_Load()
Caption = ""
Caption = random
End Sub

[IamOverlord]

سلام دوستان
من تولید اعداد هفت هشت رقمی رو می تونم تولید کنم فقط یه مشکل بزرگ وجود داره مثلا برای 7 رقمی حدود 7-8 دقیقه طول می کشه برای 8 رقمی فکر کنم چیزی بیشتر از 15 دقیقه . !!!!:متعجب:

Randomize Timer
upper = 9999999
lower = 1000000
MsgBox Int(Rnd * upper) + lower

[رامین مرادی]

Randomize Timer
upper = 9999999
lower = 1000000
MsgBox Int(Rnd * upper) + lower

مرسی از راهنماییتون ولی به نظرم متوجه سوال من نشدید
ببینید من می خوام یک سری اعداد تولید کنم نه یه عدد تصادفی ....
فرض کنید اعداد 0000000000000 تا 9999999999999 رو برام تو یه لیست باکس نشون بده
ممنون:متفکر:

[IamOverlord]

ببخشید، منظورتون به هم ریختن ترتیب اعداد 0000000000000 تا 9999999999999 بود؟

[Veteran]

منطور ایشون اینکه عداد 1 تا n رو در لیست باکس نشون بده
1
2
3
4
5
6
n
حالا چون تعداد ارقام بالاس( 8 رقمی) زمان میبره تا تولید بشه
حالا ایشون راه حلی برای کاهش زمان تولید اعداد بزرگ میخوان

[رامین مرادی]

منطور ایشون اینکه عداد 1 تا n رو در لیست باکس نشون بده
1
2
3
4
5
6
n
حالا چون تعداد ارقام بالاس( 8 رقمی) زمان میبره تا تولید بشه
حالا ایشون راه حلی برای کاهش زمان تولید اعداد بزرگ میخوان
بله دوست عزیزمون درست گفتن من یه برنامه رمز نگاری می خوام واسه پروژم بدم که باید این اعداد زود لود کنم و یه جایی ذخیره کنم مثل آرایه یا لیست باکس. در مورد پروژه هم نپرسید که چیز خیلی مزخرفی ازم خواستن و اعصابمو ریخته به هم در ضمن دوستان اگه تو محیط دیگه مثل توربو سی++ هم این اعداد تولید بشه که سرعت تولیدش زیاد باشه و اون ها رو تو یه فایل ذخیره کنه منم از وی بی فراخوانی کنم می تونید پیشنهاد بدید ممنون منتظرم

[رامین مرادی]

کسی پیدا نشد این برنامه من رو راهنمایی کنه
اگه نکنید دست به ابتکار می زنم و سیستم رو دو سه روز واسه ایجاد کد ها روشن می زارم ولی فکر کنم هنگ کنه لطفا کمکم کنید:گریه: