- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于单元格的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=71152)
-- 发布时间：2015/7/6 13:06:00
-- 关于单元格的问题
Dim chk As WinForm.CheckBox
chk = Forms("窗口3").Controls("T80")
If chk.Checked = True
Dim txt1 As WinForm.TextBox
txt1 = e.Form.CreateControl("TextBox1", ControlTypeEnum.TextBox)
txt1.Left = 100
txt1.Top = 100
e.Form.AddControl(txt1)
txt1.BindingField = Tables("表A.表B")(2,"T80")
Else
e.Form.Controls("TextBox1").Visible = False
End If
这个代码的本意是如果窗口3的“T80”复选框可见，勾选在窗口3的“T80”复选框后建立一个名为"TextBox1"的文本框并且定位到Tables"表A.表B"表“T80”列的第3行数据中，可是试了老半天不知道怎么不行呢？
-- 发布时间：2015/7/6 14:11:00
--
可以看看吗
-- 发布时间：2015/7/6 14:17:00
--
绑定没有定位的功能
txt1.BindingField = "表A.表B.T80"
-- 发布时间：2015/7/6 14:23:00
--
那我怎么定位“T80”列的第3行数据呢？
-- 发布时间：2015/7/6 14:50:00
--
谁能教教我呀
-- 发布时间：2015/7/6 14:59:00
--
Tables("表A.表B").Position = 2