html添加组合框,vb.net – 如何为组合框项添加值

如果你想使用SelectedValue,那么你的组合框必须是数据绑定的.

要设置组合框：

ComboBox1.DataSource = GetMailItems()

ComboBox1.DisplayMember = "Name"

ComboBox1.ValueMember = "ID"

要获取数据：

Function GetMailItems() As List(Of MailItem)

Dim mailItems = New List(Of MailItem)

Command = New MysqLCommand("SELECT * FROM `maillist` WHERE l_id = '" & id & "'",connection)

Command.CommandTimeout = 30

Reader = Command.ExecuteReader()

If Reader.HasRows = True Then

While Reader.Read()

mailItems.Add(New MailItem(Reader("ID"),Reader("name")))

End While

End If

Return mailItems

End Function

Public Class MailItem

Public Sub New(ByVal id As Integer,ByVal name As String)

mID = id

mName = name

End Sub

Private mID As Integer

Public Property ID() As Integer

Get

Return mID

End Get

Set(ByVal value As Integer)

mID = value

End Set

End Property

Private mName As String

Public Property Name() As String

Get

Return mName

End Get

Set(ByVal value As String)

mName = value

End Set

End Property

End Class