Foxtable(狐表)用户栏目专家坐堂 → 关于查找数据


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

主题:关于查找数据

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


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
关于查找数据  发帖心情 Post By:2017/6/1 19:52:00 [只看该作者]

如何在一个窗体的表中双击客户名称字段中某一个数值时,打开另外一个窗体并以双击客户名称字段中某一个数值为查找条件,显示在此窗体的表中 和文本框中。

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/1 20:33:00 [只看该作者]

获取某一个表的当前行的值,这样写

 

Dim str As String = Tables("表A").Current("第一列")

msgbox(str)


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


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
  发帖心情 Post By:2017/6/1 20:52:00 [只看该作者]

怎么在打开的窗体表中和文本框中显示查找的内容呢?

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/1 22:53:00 [只看该作者]

窗口AfterLoad事件

 

Dim str As String = Tables("表A").Current("第一列")

e.form.controls("TexBox1").Text = str

e.form.controls("Table1").Table.Filter = "某列 = '" & str & "'"


 回到顶部