LisyBox Selecy First Item

[morika]

سلام

1. کدی که بشه باهاش اولین ایتم listbox رو انتخاب کرد
2. کدی که بشه باهاش به ایتم بعدی listbox رفت
ممنون

[mohsenaminzare]

با سلام
فرمی مانند شکل درست کن و کد زیر رو برای اون استفاده کن
1)در رویداد لود فرم

Dim I as integer
For I = 1 to 5
Listbox1.items.add(i)
Next i
2)در رویداد کلیک دکمه next

If listbox1.selectedindex = listbox1.items.count -1 then
Listbox1.selectedindex = 0
Else
Listbox1.selectedindex += Listbox1.selectedindex
End if
2) در رویداد دکمه first

Listbox1.selectedindex = 0