PDA

View Full Version : حذف آیتم از لیست باکس



n_flower
چهارشنبه 14 تیر 1385, 10:43 صبح
من میخوام چند آتم خاص رو از لیست باکسم حذف کنم مثل این.ولی درست حذف نمیکنه
ditofinsert.Items.RemoveAt(y)
ditofinsert.Items.RemoveAt(y + 1)
ditofinsert.Items.RemoveAt(y + 2)
ditofinsert.Items.RemoveAt(y + 3)
ditofinsert.Items.RemoveAt(y + 4)
ditofinsert.Items.RemoveAt(y + 5)
ditofinsert.Items.RemoveAt(y + 6)
ditofinsert.Items.RemoveAt(y + 7)
ditofinsert.Items.RemoveAt(y + 8)

ghafoori
چهارشنبه 14 تیر 1385, 12:21 عصر
ببخشید دوست عزیز من میخواستم ببینم این نکته را که اندیس آیتمهای لیست باکس از صفر شروع میشود را رعایت کردید و دوم چرا این کد خودتون را در حلقه ننوشتید که نخواهید 9 خط کد بنویسید:خجالت:

n_flower
چهارشنبه 14 تیر 1385, 12:51 عصر
بله.دقیقا از صفر در نظر گرفتم

'For y = 0 To ditofinsert.Items.Count - 1
or k = 0 To ListBox1.Items.Count - 1

' ditofinsert.Items.RemoveAt(y)
' ditofinsert.Items.RemoveAt(y + 1)
' ditofinsert.Items.RemoveAt(y + 2)
' ditofinsert.Items.RemoveAt(y + 3)
' ditofinsert.Items.RemoveAt(y + 4)
' ditofinsert.Items.RemoveAt(y + 5)
' ditofinsert.Items.RemoveAt(y + 6)
' ditofinsert.Items.RemoveAt(y + 7)
' ditofinsert.Items.RemoveAt(y + 8)
' 'Next

ghafoori
چهارشنبه 14 تیر 1385, 17:15 عصر
ببینم دوست عزیز این نکته هم رعایت کردید که پس از حذف یک ایتم دوباره ایتمهای listbox شماره گذاری میشوند مثلا شما یک listbox با چهار ایتم {یک و دو و سه و چهار } را دارید کد زیر


ListBox1.Items.RemoveAt(1)
ListBox1.Items.RemoveAt(2)
باعث حذف عناصر دو و چهار میشود زیرا دوباره ایتمهای listbox شماره گذاری میشوند این هم رعایت کردید:لبخند:

lomir
پنج شنبه 15 تیر 1385, 12:19 عصر
من منظورتو نفهمیدم
شما می خوای چند ایتم خواص رو حذف کنید
یا از ان جای که اون ایتم خواص به بعد رو انتخاب کردی رو می خوای حذف کنی ؟

lomir
پنج شنبه 15 تیر 1385, 13:27 عصر
اگر می خوای چند آیتم رو حذف کنی یعنی چند آیتم رو در listbox انتخاب کردی
از این استفاده کن برای اینکه خطای ایندکس ازت نگریه توی try ................end try قرارش بده



For i = 0 To ListBox1.Items.Count - 1
Try
If ListBox1.GetSelected(i) = True Then
ListBox1.Items.RemoveAt(i)
End If
Catch ex As Exception
End Try
Next

Mehrafrooz
پنج شنبه 15 تیر 1385, 17:03 عصر
اجازه بدید یه نکته هم من اضافه کنم .
تو لیست باکس و یا مثلا دیتا گرید وقتی می خواید چند تا آیتم رو حذف کنید بهتره که از آخر شروع کنید و به اول بیاید . چون وقتی از اول شروع می کنید همونطور که دوستان گفتند ترتیب عوض میشه .

n_flower
یک شنبه 18 تیر 1385, 15:14 عصر
ممنون با راهنمایی شما مشکلم حل شد:تشویق: