以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  筛选问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=21139)
--  作者：jianjingmaoyi
--  发布时间：2012/7/2 21:32:00
--  筛选问题
  老大,我有两个表  一模一样的字段  一模一样的数据


  我想利用本表的当前行的数据来筛选另外一个相对应的数据的表.

  代码怎么写?

  我遍历了以后 筛选数据不出来.
--  作者：狐狸爸爸
--  发布时间：2012/7/3 9:14:00
--  

设置在CurrentChanged事件：

 

Dim r As Row = e.Table.Current
if r IsNot  Nothing Then
     dim wz AS integer = Tables("另一个表").Findrow("某某列 = \'" & r("某某列") & "\'")
     If wz >=0 Then
           Tables("另一个表"). Position = wz
     end if
End if
--  作者：blackzhu
--  发布时间：2012/7/3 11:45:00
--  
老大你这个如果是指定列,我就不问了,已经搞定 昨日的代码没有一点问题,问题是我没有排除空值,所以找不到了,后来加了判断  就可以了.