WinForm: получение значений из выбранных элементов в списке

Как получить значения (не отображаемый текст) всех выбранных элементов в списке?

Мое намерение состоит в том, чтобы использовать значения (которые представляют первичные и внешние ключи в моих базах данных) для сборки SQL-запроса.

Спецификации: Использование WinForm с .Net Framework v.4


person Jesslyn    schedule 26.08.2010    source источник


Ответы (1)


Вы также можете использовать любой объект в списке. Небольшой пример ниже, но для тестирования вам нужно будет создать форму со списком и кнопкой на нем. Та же идея, что и со словарем, но это будет работать с более сложными объектами.

Public Class Form1

    Dim tests As New List(Of Test)

    Class Test
        Private _Key As Integer
        Public Property Key() As Integer
            Get
                Return _Key
            End Get
            Set(ByVal value As Integer)
                _Key = value
            End Set
        End Property


        Private _value As String
        Public Property Value() As String
            Get
                Return _value
            End Get
            Set(ByVal value As String)
                _value = value
            End Set
        End Property
    End Class

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        With tests
            .Add(New Test With {.Key = 1, .Value = "Val1"})
            .Add(New Test With {.Key = 2, .Value = "Val2"})
            .Add(New Test With {.Key = 3, .Value = "Val3"})
        End With

        ListBox1.SelectionMode = SelectionMode.MultiSimple
        ListBox1.DisplayMember = "Value"

        For Each t In tests
            ListBox1.Items.Add(t)
        Next

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For Each t As Test In ListBox1.SelectedItems
            Debug.WriteLine(t.Key)
        Next
    End Sub

End Class
person Jeremy    schedule 26.08.2010