نمایش اتفاقی عدد

[Kazem Forghani 2,927]

سلام

اول از همه چی بگم جستجو کردم اما متاسفانه به نتیجه ای نرسیدم.

چطوری مثلا بگیم از بین چند عدد یکی رو به صورت اتفاقی انتخاب کنه؟

مثلا  از بین اعداد :

1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10

یه عدد به صورت اتفاقی انتخاب بشه و کاربر نمایش داده بشه .

پیشاپیش تشکر

[پژمان نیکروان 6,055]

Dim adad As Int
adad=Rnd(1,10)
Msgbox(adad,"")

از 1تا 10 تصادفی عدد میده به مسیج باکس.