主题：[求助]

 对某表分组统计后生成的临时表,无法与原表形成某种关联,那如何对临时表中的当前行在原表中快速定位相关的数据呢?

请老师指点.

为了解决这个问题,昨晚在原表一个窗体中加了一个定位按钮,代码如下:

'若存在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".

问题找到了,是自己无意中修改了鼠标形态属性.