Re: [VB6 ] ListBox的刪除問題

看板Visual_Basic作者 (矇面加菲獅)時間19年前 (2006/02/06 16:42), 編輯推噓6(603)
留言9則, 2人參與, 最新討論串2/3 (看更多)
※ 引述《Guestion (Question)》之銘言: : 如果ListBox的MultiSelect為單選時,要刪除選取的資料為: : If List1.ListIndex >=0 Then : List1.RemoveItem List1.ListIndex : End If : 但如果MultiSelect為多選時,以上的程式好像會出錯 : 請問該如何修改呢? If List1.MultiSelect = 0 Then '單選 If List1.ListIndex >= 0 Then List1.RemoveItem List1.ListIndex Else '複選 For i = List1.ListCount - 1 To 0 Step - 1 If List1.Selected(i) Then List1.RemoveItem i Next End If -- ▃▅▇▆▄ ▆▂▃ ` 逝去感如何能留住,半點遺留殊不易,██▅▇▄▃ ▇▃▂" . █████████▃i ▁▄▇ 更多悽悽慘慘的遭遇………██▆▃ █▅▆▃ˍ▄* ▂█▄▇▅▂. 我不知道,王~八~蛋~~! ▂▆███ █▄▃ 。fumizuki。Check。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.58.156.43

02/06 17:58, , 1F
豁然開朗!再次感謝板主
02/06 17:58, 1F

02/06 18:03, , 2F
有疑問...ListBox的MultiSelect我選1後,執行時一次刪兩個
02/06 18:03, 2F

02/06 18:04, , 3F
選項會出現"不正確的屬性陣列索引值" 該如果解決呢
02/06 18:04, 3F

02/06 18:07, , 4F
好像MultiSelect選1後,刪除選項都會錯誤
02/06 18:07, 4F
※ 編輯: fumizuki 來自: 210.58.156.43 (02/06 19:24)

02/06 19:24, , 5F
在keyin 程式碼的時候忘掉了這個重點了,已更正@@
02/06 19:24, 5F

02/06 20:10, , 6F
可以執行囉 謝謝板主! 不過為什麼i要倒著迴圈呢
02/06 20:10, 6F

02/06 20:24, , 7F
因為你把前面的資料刪除了 listcount就改變了
02/06 20:24, 7F

02/06 20:24, , 8F
listindex 也會跟著變動
02/06 20:24, 8F

02/06 20:30, , 9F
原來是這樣...謝謝囉
02/06 20:30, 9F
文章代碼(AID): #13vmlyMG (Visual_Basic)
討論串 (同標題文章)
本文引述了以下文章的的內容:
以下文章回應了本文
完整討論串 (本文為第 2 之 3 篇):
文章代碼(AID): #13vmlyMG (Visual_Basic)