используя Bindinglist в качестве привязки для Textbox

Question

У меня есть список обязательных.я использую текстовое поле для отображения его элементов

WithEvents xBind As New BindingList(Of Emp)

Я добавил элементы таким образом

xBind.Add(New emp("alpha0", "B"))
xBind.Add(New emp("alpha1", "B"))
xBind.Add(New emp("alpha2", "B"))
xBind.Add(New emp("alpha3", "B"))

Я привязываю первое свойство к текстовому полю

TextBox1.DataBindings.Add("text", xBind, "eName")

Он показывает «alpha0» в форме, которая является первым элементом в xbind. Теперь, как мне отобразить второй элемент в textbox1, когда я нажимаю кнопку «MoveNext»?

Answer 1

Я столкнулся с этим, когда искал решение подобного вопроса.Для всех, кто сталкивался с этим, я решил использовать BindingSource.

Dim bsXBind As New BindingSource
...
bsXBind.DataSource = xBind
TextBox1.DataBindings.Add("Text", bsXBind, "eName")

Для перехода к другой записи измените BindingSource.Position:

Private Sub NextXRecord()
    If bsXBind.Position < bsXBind.Count - 1 Then
        bsXBind.Position += 1
    End If
End Sub

Answer 2

Я думаю, вам нужен список или сетка вместо текстового поля, которое показывает только одно значение за раз.