问题就是我使用节点查询后，再用精确查询，这是，精确查询显示的列就不是全部列，而是只显示节点查询设置的显示列。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:7,(2).table

Dim txt As String =  e.Form.Controls("xmzd").Value
If txt = "" Then
    Return
End If
Dim flt As String
If IsNumeric(txt) Then
    If txt.Length <> 5 Then
        messagebox.show("请输入正确的五位数编号")
        Return
    Else
        flt = "编号 = \'" & txt & "\'"
    End If
Else
    flt = "姓名 = \'" & txt & "\'"
End If
If  DataTables("基本资料").Find(flt) Is Nothing Then
    messagebox.show("查无此人")
Else
    Tables("资料查询_资料查询").filter = flt
    For Each c As col In Tables("资料查询_资料查询").Cols
        c.Visible = True
    Next
End If

OK了，狐爸，能帮忙再解决下项目里面的2个时间查询不，主要是因为先用目录树查询，因为时间列和涉及到的时间太多，看起来眼花缭乱，反而不如直接输入查询方便。

呵呵，我不明白你的问题，重新整理问题，说清楚点，另外发帖提问的。

另再次建议，先打基础，如果我写给你的代码，你看不明白，只知道套用，做不到举一反三的话，就没有意义了。