[vb.net] Textbox an Zelle eines DataTable binden

Gepostet am: May 12, 2011 5:28:27 AM

LinkControlToDataTableCell

Public Sub LinkControlToDataTableCell(ByRef myControl As Control, ByVal myDataTable As DataTable, ByVal ColumnText As String, ByVal iRow As Integer, Optional ByVal sType As String = "Text")         Try             Dim myBindingSource As New BindingSource             myBindingSource.DataSource = myDataTable             myBindingSource.Position = iRow             myControl.DataBindings.Add(New Binding(sType, myBindingSource, ColumnText))         Catch ex As System.ArgumentException             'ignorieren         Catch ex As Exception             Debug.Print("Fehler:" & ex.Message)         End TryEnd Sub