Question

我有一个具有约束力的名单。 i 正在使用一个文本箱显示其项目

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")

It shows "alpha0" in the form which is first item in the xbind Now how do I display the second item in textbox1 when i click "MoveNext" button ?

Answer 1

我认为,你需要一个名单箱或网格,而不是一个案文箱,而该盒当时只显示一种价值。

Answer 2

我在寻求解决类似问题时就是这样做的。对于可能出现这种情况的其他人来说,我的解决办法是利用一种约束手段。

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

移至另一个记录,改写。职位:

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