以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/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