رندوم

[mvig]

سلام

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

با Random و Randomize هر كارى كردم درست نشد.
اگه ميشه يكى بگه جاى كد هر كدوم كجاست.يعنى جاى نوشتن Listbox1.items و كد رندوم و اونى كه نشون ميده(مثلا ليبل).

[ajlajlajl]

منظورتون اینه که یه ایتم رو بصورت رندم انتخاب کنه و نشون بده؟

کد:

Dim r As New Random()
        Label1.Text = ListBox1.Items(r.Next(0, ListBox1.Items.Count))

[mvig]

منظورتون اینه که یه ایتم رو بصورت رندم انتخاب کنه و نشون بده؟

کد:

Dim r As New Random()
        Label1.Text = ListBox1.Items(r.Next(0, ListBox1.Items.Count))

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