كد توليد اعداد تصادفي 12 رقمي رو كي داره ؟

[a_m_i_n_000]

كد توليد اعداد تصادفي 12 رقمي رو كي داره ؟
اگه بزارين ممنون مي شم .
مرسي

[shask00l]

دوست عزیز . همونطور که خودتون گفتید این عدد تشکیل میشه از 12 تا عدد 1 رقمی . بنابراین میتونید دونه دونه اعداد رو حساب کنید و بعد به هم بچسبونید .
موفق باشی

[ƒxmahdi]

این نمونه برنامه هر یک ثانیه یک عدد تصادفی 12 رقمی را روی فرم چاپ می کند

[.:KeihanCPU:.]

 

Dim S As String

Dim R As String

Randomize Timer

For i = 0 To 11

S = Int(Rnd * 10)

R = R & S

Next

[smile17]

مطلبی در همین مورد
چگونه کامپیوتر با ساختار منطقی می تواند اعداد تصادفی تولید کند :
http://links.p30download.com/archives/12494.php

[majidrezaei2007]

دوست من از این کد هم میتونی استفاده کنی که نیاز به تولید 12 عدد جداگانه و چسبوندن آنها به یکدیگر نباشد . چون اگه بخوای تعداد داده زیادی تولید کنی یکم کارایی برنامت پائین می یاد . از این استفاده کنی بهتره . البته نظر دوستان هم خوبه .

Int(Rnd * 1000000000000#)

[shask00l]

فکر نمیکنید 12 رقم برای محدوده integer یک مقداری بزرگ باشه .. ؟ البته میشه شبیه سازی کرد ... ولی به دردسرش نمیارزه .

[.:KeihanCPU:.]

دوست من از این کد هم میتونی استفاده کنی که نیاز به تولید 12 عدد جداگانه و چسبوندن آنها به یکدیگر نباشد . چون اگه بخوای تعداد داده زیادی تولید کنی یکم کارایی برنامت پائین می یاد . از این استفاده کنی بهتره . البته نظر دوستان هم خوبه .

Int(Rnd * 1000000000000#)

خروجی این دستور همیشه 12 رقمی نیست.اگه از این دستور استفاده بشه باید از Len(exp) خروجی رو کنترل کرد.

[syntiberium]

با سلام . این دوستی که در مورد طرز کار تابع rnd لینک معرفی کردن یکمی توضیحشون واضح نیست و یکمی درکش سخته . توضیح خیلی سادش اینه که این تابع رادیکال اعداد را می گیره و اعداد بعد از اعشار آن را جدا می کنه و به ما تحویل می ده . به همین ساد گی و شما همین حالا می تونید ماشین حساب کامپیوتر را اجرا کنید و یه عددی که جزر عدد صحیح نداشته باشه بهش بدین و دکمه ی sqrt را بزنید تا از آن جزر بگیرد . مشاهده می کنید که یک سری اعداد به هم ریخته و تقریبا غیر قابل پیشبینی نشان ما می ده . برنامه نویس ها از همین ترفند می تونن تابع rnd را بسازند .
من این نرم افزار را خودم نوشتم که دقیقا از همین روش استفاده می کنه و لینکش اینه :
کد کردن عکس با قابلیت بازگشت
من برای اینکه شروع اعداد شانسی را بدست بیارم و کنترلش کنم مجبور به نوشتن این تابع شدم . با تشکر .

[a_m_i_n_000]

از همتون ممنونم . مشكلم با كمك شما حل شد .