Foxtable(狐表)用户栏目专家坐堂 → [求助]文本框动态绑定列


  共有1887人关注过本帖树形打印复制链接

主题:[求助]文本框动态绑定列

帅哥哟,离线,有人找我吗?
jyh7081
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:963 积分:8510 威望:0 精华:0 注册:2012/10/3 13:25:00
[求助]文本框动态绑定列  发帖心情 Post By:2017/7/23 9:33:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:image 1.jpg
图片点击可在新窗口打开查看


下拉框选择表→目录树定位行→显示当前表当前行的指定列,下面是目录树的NodeMouseClick事件代码,加粗的代码没有执行,请帮助看看,谢谢!

Dim lst As WinForm.ComboBox
Lst = Forms("窗口1").Controls("ComboBox1")
Dim t As Table = Tables(lst.SelectedValue)

With t
    Dim r As Integer
    r = .FindRow("[第一列] = '" & e.Node.Text & "'") ' 从第一行开始查找
    If r >= 0 Then '如果找到的话
        .Position = r '定位到找到的行.
    End If
End With

e.Form.Controls("TextBox1").BindingField   = "t.第三列"

附件:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:动态绑定表-列.table


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/23 9:40:00 [只看该作者]

e.Form.Controls("TextBox1").BindingField   = t.name & ".第三列"

 回到顶部