If TypeOf e.Sender Is WinForm.Label Then \'如果单击的是标签

    If e.Sender.Name.ToLower.StartsWith("sh") Then \'而且名称是以sh开头

        Dim sh As String = e.Sender.Name.SubString(2) \'获取省份

        \'Dim ps As Integer = Tables("监造物资明细表").FindRow("监造地 = \'" & sh & "\'") \'找出此省份所在行的位置

        \'If ps >= 0 Then \'如果找到

            Tables("监造物资明细表").Filter = "[监造地] =  sh"

        \'End If

    End If

End If

我在窗口的CLICK中，想设置成点击地图的某个省会城市，就可以根据选择的省来筛选出表"监造物资明细表"中在该省会的全部明细，我似乎觉得Tables("监造物资明细表").Filter = "[监造地] =  sh"语句不对，实际也确实无法筛选，请高手指点一下问题在那里？

我是在按照Casestudy 例子在依葫芦画瓢在做。