以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=50970) |
-- 作者:wyz20130512 -- 发布时间:2014/5/16 8:31:00 -- [求助] 对某表分组统计后生成的临时表,无法与原表形成某种关联,那如何对临时表中的当前行在原表中快速定位相关的数据呢? 请老师指点. 为了解决这个问题,昨晚在原表一个窗体中加了一个定位按钮,代码如下: \'若存在gyshjdhz表,则置b为True Dim b As Boolean For Each t As Table In Tables If t.Name = "gyshjdhz" Then b = True End If Next \'若b为False,即不存在gyshjdhz表,直接终止程序的执行. If b = False Then MessageBox.Show("供应商阶段汇总表(gyshjdhz)不存在!") Return \'若存在,则在hc表中过滤出相应的数据 Else Dim r As Row = Tables("gyshjdhz").Current With Tables("hc") .Filter = "gysh = \'" & r("gysh") & "\' And rq = #" & r("rq") & "#" End With End If 运行后,得到了想要的结果,可不知为何鼠标移到按钮上时,鼠标的形态与其它按钮不一样,显示的是一个"I". 问题找到了,是自己无意中修改了鼠标形态属性. [此贴子已经被作者于2014-5-16 9:06:13编辑过]
|
-- 作者:Bin -- 发布时间:2014/5/16 8:32:00 -- 利用FIND查找. http://www.foxtable.com/help/topics/0552.htm |