本文整理汇总了VB.NET中System.Windows.Forms.ControlBindingsCollection.Add方法的典型用法代码示例。如果您正苦于以下问题:VB.NET ControlBindingsCollection.Add方法的具体用法?VB.NET ControlBindingsCollection.Add怎么用?VB.NET ControlBindingsCollection.Add使用的例子?那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。您也可以进一步了解该方法所在类System.Windows.Forms.ControlBindingsCollection
的用法示例。
在下文中一共展示了ControlBindingsCollection.Add方法的2个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: BindControls
Protected Sub BindControls()
' Create a new Binding using the DataSet and a
' navigation path(TableName.RelationName.ColumnName).
' Add event delegates for the Parse and Format events to
' the Binding object, and add the object to the third
' TextBox control's BindingsCollection. The delegates
' must be added before adding the Binding to the
' collection; otherwise, no formatting occurs until
' the Current object of the BindingManagerBase for
' the data source changes.
Dim b As New Binding("Text", ds, "customers.custToOrders.OrderAmount")
AddHandler b.Parse, AddressOf CurrencyStringToDecimal
AddHandler b.Format, AddressOf DecimalToCurrencyString
textBox1.DataBindings.Add(b)
End Sub
示例2: BindTextBoxProperties
Private Sub BindTextBoxProperties()
' Clear the collection before adding new Binding objects.
textBox1.DataBindings.Clear()
' Create a DataTable containing Color objects.
Dim t As DataTable = MakeTable()
' Bind the Text, BackColor, and ForeColor properties
' to columns in the DataTable.
textBox1.DataBindings.Add("Text", t, "Text")
textBox1.DataBindings.Add("BackColor", t, "BackColor")
textBox1.DataBindings.Add("ForeColor", t, "ForeColor")
End Sub
Private Function MakeTable() As DataTable
' Create a DataTable with three columns.
' Two of the columns contain Color objects.
Dim t As New DataTable("Control")
t.Columns.Add("BackColor", GetType(Color))
t.Columns.Add("ForeColor", GetType(Color))
t.Columns.Add("Text")
' Add three rows to the table.
Dim r As DataRow
r = t.NewRow()
r("BackColor") = Color.Blue
r("ForeColor") = Color.Yellow
r("Text") = "Yellow on Blue"
t.Rows.Add(r)
r = t.NewRow()
r("BackColor") = Color.White
r("ForeColor") = Color.Green
r("Text") = "Green on white"
t.Rows.Add(r)
r = t.NewRow()
r("BackColor") = Color.Orange
r("ForeColor") = Color.Black
r("Text") = "Black on Orange"
t.Rows.Add(r)
Return t
End Function