عدد تصادفی

[morteza@z]

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

[Hybrid]

سلام دوست عزیز برای تبدیل عدد تصادفی بین دو عدد مثلا y و x مینونین از کد زیر استفاده کنین...


Int((y - x + 1) * Rnd() + x)

در کد بالا y میتونه تکست باکس دوم شما و x میتونه تکست باکس اول شما باشه....

تابع rnd هم که در کد بالا مشاهده میکنین باعث میشه در هر دفعه دنباله غیر تکراری ایجاد بشه و هیچ تو عدد تصادفی مثل هم نباشه ...امیدوارم توضیحاتم رو فهمیده باشین اگه مشکلی بود در خدمتم....موفق باشید

[morteza@z]

سلام دوست من این کد در دکمه که گذاشتم کار نکرد مشگل از کجاست؟:خجالت:

[Hybrid]

دوست عزیز یادم رفت در خط اول رویداد کلیک دکمه Randomize رو صدا بزن...

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


Private Sub btnNew_Click(…) Handles btnNew.Click
Randomize()
Label3.Text = Int((txtEnd.Text - txtStart.Text + 1) * Rnd() +
txtStart.Text)
End Sub