درخواست کمک

[reza2008_az]

با عرض سلام
لطفا دستور به دست آوردن اعداد رندوم که در هر بار اجرا عین هم نباشه رو هر جه سریع تر بهم بگین

---

لطفا دستور به دست آوردن اعداد رندوم که در هر بار اجرا عین هم نباشه رو در vb هر جه سریع تر بهم بگین

[Tender]

با تابع Rnd بدست میاد
به اینصورت اگه اشتباه نکنم

کد:

X = Rnd()*10

اگه تابع رو تنها بنویسی یه رقم اعشاری کوچکتر از 1 و بزرگتراز 0 توی خروجی میده

ضرب کن با یه عددی مثل 10 تا از 0 فش 10 باشه عدد

[download69]

سلام دوست عزیز
دوستمون تقریبا درست گفتن ولی از کد زیر استفاده کن کامل تر

[code]
x=int(Rnd*10)
[/code
میتونی عدد 10 رو بنا به خواست خودت تغییر بدی

[1120]

با عرض سلام
لطفا دستور به دست آوردن اعداد رندوم که در هر بار اجرا عین هم نباشه رو هر جه سریع تر بهم بگین

---

لطفا دستور به دست آوردن اعداد رندوم که در هر بار اجرا عین هم نباشه رو در vb هر جه سریع تر بهم بگین

سلام.

reza2008_az عزیز برای اینکه اعداد شما در هر بار اجرا تکراری نباشند باید دستور Randomize Timer رو قبل از بدست آوردن اعداد تصادفی قرار بدید .

کد:

Private Sub Command1_Click()
Randomize Timer
Print Int(Rnd * 10)
End Sub

موفق باشید .