ايران ويج

نسخه‌ی کامل: رندوم
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
سلام

من يه كد مى‌خواستم كه از يه ليست باكس،آيتماش رو بگيره،با زدن يه دكمه رندوم كنه و تو يه چيزى(حالا هر چى شد)،آيتم رندوم شده رو نشون بده.

با Random و Randomize هر كارى كردم درست نشد.
اگه ميشه يكى بگه جاى كد هر كدوم كجاست.يعنى جاى نوشتن Listbox1.items و كد رندوم و اونى كه نشون ميده(مثلا ليبل).
منظورتون اینه که یه ایتم رو بصورت رندم انتخاب کنه و نشون بده؟
کد:
Dim r As New Random()
        Label1.Text = ListBox1.Items(r.Next(0, ListBox1.Items.Count))
(۱۵-مهر-۱۳۸۸, ۲۰:۴۵:۳۶)ajlajlajl نوشته است: [ -> ]منظورتون اینه که یه ایتم رو بصورت رندم انتخاب کنه و نشون بده؟
کد:
Dim r As New Random()
        Label1.Text = ListBox1.Items(r.Next(0, ListBox1.Items.Count))

بله ممنون
كار كرد