Как добавить новому Item ComboBox - Tag? - Visual Basic .NET
Формулировка задачи:
Из за структуры формы я могу добавить только КомбоБокс для выбора человека (ФИО - нет проверки на уникальность). Можно ли как то добавить итем - ФИО и тег, его ID в этот итем?
Я думал над идеей добавлять теги типа в конце каждого итема, для обработки, но думаю есть способ и красивее
Решение задачи: «Как добавить новому Item ComboBox - Tag?»
textual
Листинг программы
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim persons As New List(Of Person) persons.Add(New Person("Иванов", 1)) persons.Add(New Person("Петров", 2)) ComboBox1.DataSource = persons ComboBox1.DisplayMember = "FIO" ComboBox1.ValueMember = "ID" End Sub Private Sub ComboBox1_SelectedvalueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedValueChanged Me.Text = CType(ComboBox1.SelectedItem, Person).ID End Sub End Class Public Class Person Public Property FIO As String Public Property ID As Integer Public Sub New(ByVal fam As String, ByVal num As Integer) FIO = fam ID = num End Sub End Class