Vb.net 下拉列表未显示正确的值

这是我的班级

Public Class TitleV_List
    Public Full_Name As String
    Public ID As Integer
    Sub New(ByVal Full_Name As String, ByVal ID As Integer)
        Me.Full_Name = Full_Name
        Me.ID = ID
    End Sub
End Class

这是我的密码：

Dim TitleVList As New List(Of TitleV_List)


con = New SqlConnection(connectionString)

sql = "Select ID, Full_Name FROM cts_TitleV_Leads WHERE IsActive = 1"

If con.State = ConnectionState.Closed Then
    con.Open()
End If

cmd.CommandType = CommandType.Text
cmd.Connection = con
cmd.CommandText = sql

dr = cmd.ExecuteReader

If dr.HasRows = True Then
    While dr.Read

        TitleVList.Add(New TitleV_List(dr("Full_Name"), dr("ID")))
    End While
End If

If con.State = ConnectionState.Open Then
    con.Close()
    dr.Close()
End If

ddlpropTitleVlist.DataSource = TitleVList

我检查代码，正确的值进入下拉列表，但在屏幕上单击下拉箭头时，所有值为： “CTSnet.TitleV_列表”

---

项目名称为CTSnet。我做错了什么？？？

你需要做两件事才能让这一切顺利进行。首先，为ddlpropTitleVlist设置DisplayMember和ValueMember。在设置数据源之后，如下所示：

ddlpropTitleVlist.DisplayMember = "Full_Name"
ddlpropTitleVlist.ValueMember = "ID"

此外，您需要将这些成员指向TitleV_List类的属性：

Public Property Full_Name As String
Public Property ID As Integer

---

（当我们谈论内容时，我认为你应该从类名中删除“_List”，因为它不是任何类型的列表。也许称它为TitleV_Item，那么你的TitleVList将建议一个项目列表，而不是错误地建议一个列表。）

我确实添加了你建议的内容，但我仍然得到了相同的结果。