منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طلب كود اختيار كلمة عشوائيه من listbox وعرضها في textbox
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

طلب كودين للفيجوال بيسك 2010 الاول عند الضغط على عشوائي يأتي بجمله عشوائيه من listbox 
ويقوم بعرضها فوق في textbox

والثاني انا ياتي بالترتيب من اول جمله الى اخر جمله ثم يعيد

يعني كل مااضغط على ترتيب او عشوائي تظهر لي حكمه او شعر من اللي انا ضايفهم في مربع listbox



بخصوص الكود الاول هذا الكود

PHP كود :
Dim rand As Integer = (Rnd() * ListBox1.Items.Count)
 
       ListBox1.SelectedIndex rand 


الكود الثاني تضعه في التايمر 

PHP كود :
On Error Resume Next
        For i 
0 To ListBox1.Items.Count
            ListBox1
.SelectedIndex i
            System
.Threading.Thread.Sleep(500)
 
       Next 


وشكرا