BindingField

字符型,返回或设置控件的绑定字段。

示例一

Forms("窗口1").Controls("TextBox1").BindingField = "产品.产品名称"
Forms("窗口1").Controls("TextBox2").BindingField = "产品.订单.数量"

上述代码将TextBox1绑定到“产品”表的“产品名称”列,将TextBox2绑定到关联表“产品.订单”的“数量”列。

示例二

Dim s As String = e.Form.Controls("TextBox1").BindingField
If
s > "" Then
    Dim
p As Integer = s.LastIndexOf(".")
    Dim
t As String = s.SubString(0, p)
    Dim
c As String = s.SubString(p + 1)
    MessageBox.Show("绑定表: " & t & " 绑定列: " & c)
End
If

上述代码获得TextBox1绑定的表名和列名。

提示:并非所有的控件都可以绑定的,此类控件虽然也有BindingField属性,但是不会发生任何作用。

示例三

如果绑定到Var变量,格式为“全局变量.变量名”,例如要绑定到名为“起始日期”的Var变量:

e.Form.Controls("TextBox1").BindingField = "全局变量.起始日期"


本页地址:http://www.foxtable.com/webhelp/topics/1860.htm