Обратиться ко второму столбцу ComboBox (DisplayMember)

s = ""
For i = 0 To Me.idWork.Items.Count - 1
     s = s & ";" & Me.idWork.Text 'К какому свойству обратиться здесь, чтобы получить текстовое значение, а не id?
Next
MessageBox.Show(s)

    Friend Class tst1
        Private _ID As Integer
        Private _Name As String
        Sub New(ByVal idd As Integer, ByVal nm As String)
            MyBase.New()
            _ID = idd
            _Name = nm
        End Sub
        Public Property ID As Integer
            Get
                Return _ID
            End Get
            Set(ByVal value As Integer)
                _ID = value
            End Set
        End Property
        Public Property Name As String
            Get
                Return _Name
            End Get
            Set(ByVal value As String)
                _Name = value
            End Set
        End Property
    End Class
    Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
        Dim mb() As tst1 = {New tst1(1, "qqqq"), New tst1(2, "sssss"), New tst1(3, "hhhhh"), New tst1(4, "nnnnn"), New tst1(5, "yyyyy")}
        idWork.DataSource = mb
        idWork.DisplayMember = "Name"
        idWork.ValueMember = "ID"
        Dim s As String = ""
        For i = 0 To Me.idWork.Items.Count - 1
            s = s & idWork.GetItemText(idWork.Items(i)) & vbCrLf
        Next
        MessageBox.Show(s)
    End Sub

idWork.GetItemText(idWork.Items(i))

funContain(Me.idWork.Text, "idWork")

If Len(Replace(Me.idWork.Text, " ", "")) > 0 Then