2011-05-24 69 views
0

我必須創建一個帶有幾個(8)名稱的列表框&雙擊列表框中的名稱將從中刪除名稱。visual basic:幫助從列表框中刪除項目

我已經使用listbox.items.add方法&將名稱添加到表單中將顯示其中的名稱。

然後我使用「listbox.items.remove」方法在double_click過程(listbox)中輸入8個名字的編碼。 但是,當我嘗試雙擊列表框中的名稱時,它會刪除所有名稱。 我需要什麼編碼?幫助讚賞!

回答

1
Option Strict On 
Option Explicit On 

Public Class Form1 

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    ListBox1.Items.Clear() 
    ListBox1.Items.Add("1") 
    ListBox1.Items.Add("2") 
    ListBox1.Items.Add("3") 
    ListBox1.Items.Add("4") 
    ListBox1.Items.Add("5") 
    ListBox1.Items.Add("6") 
    ListBox1.Items.Add("7") 
    ListBox1.Items.Add("8") 
    End Sub 

    Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick 
    Dim i As Integer = ListBox1.SelectedIndex 
    If i >= 0 And i < ListBox1.Items.Count Then 
     ListBox1.Items.RemoveAt(i) 
    End If 
    End Sub 

End Class 
+0

獎勵功能:雙擊空白處粘貼列表的末尾。 – 2011-05-24 05:42:48