PDA

View Full Version : سوال: سوال در لیست باکس



hackershz
سه شنبه 03 آذر 1388, 23:07 عصر
سلام دوستان عزیز

من یه لیست باکس دارم که 20 تا اسم توش هست میخوام با کلیک روی یک دکمه این 10اسم وارد یه تکست بشه که مولتی لاینش روشنه

مثلا توی لیست باکس اینجوری
ali
hasan
reza
و...
میخوام وقتی روی دکمه کلیک میکنیم

10 تا از اسم های هم پاک بشه و هم انتقال داده بشه به تکست باکس وبه ترتیب هم باشه

mpmsoft
چهارشنبه 04 آذر 1388, 07:57 صبح
For i = 0 to List1.ListCount -1
Text1.Text = Text1.Text & List1.Text(i) & vbnewline
Next

far9090
چهارشنبه 04 آذر 1388, 10:11 صبح
سلام . این Sample رو درست کردم . خیلی میشه بهترش کرد . ببین به درده کارت می خوره یا نه . موفق باشید .

mostafa_bahar
چهارشنبه 04 آذر 1388, 11:25 صبح
For i = 0 to List1.ListCount -1
Text1.Text = Text1.Text & List1.Text(i) & vbnewline
Next
و این کد


list1.removeitem(index)

استفاده کنید