作者Guestion (Question)
看板Visual_Basic
標題Re: [VB6 ] ListBox的刪除問題
時間Mon Feb 6 21:37:07 2006
※ 引述《fumizuki (矇面加菲獅)》之銘言:
: ※ 引述《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= ListCount-1 to 0 的話
這樣listindex會隨著listcount改變
但如果是i= 0 to ListCount-1
listindex還會改變嗎? 或者會影響的不是這部分?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.113.27.57
推 fumizuki:請你使用F8 逐行執行 觀查變數及list內容的變化 02/07 08:44
推 Guestion:終於懂了...感謝! 02/07 12:36