Заполнение ListBox списком <class> VB.NET
У меня есть класс с именем optionCode:
Class optionCode
Public description As String
Public optCode As String
End Class
У меня есть запрос возвращает список этого класса optionCode:
Dim _SelectActiveOptionCodes2 = (From _OptCodes In _EntityModel.tblOptionCodes
Where _OptCodes.fdStatus = "A"
Select New optionCode With {.description = _OptCodes.fdDescription,
.optCode = _OptCodes.fdOptionCode}).ToList()
Я хочу использовать этот список для заполнения списка, где описание - это поле отображения, а код опции - это поле значения.
Когда используешь:
sortableOptionCodes = _SelectActiveOptionCodes2
sortedOptionCodes = _SelectActiveOptionCodes2
OptionCodeListBox.DataSource = sortedOptionCodes
Список заполняется, но каждая запись «OptionCodeSearch.Form1 + optionCode»
Я не могу понять, как использовать функции .ValueMember и .DisplayMember, чтобы заставить список загружаться так, как я хочу.