以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]请问在filter中如何用变量作列名？我是新手，请帮助！  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14493)

--  作者：amanda111 --  发布时间：2011/11/21 20:12:00 --  [求助]请问在filter中如何用变量作列名？我是新手，请帮助！ Dim Value()As String Dim Filter As String Dim lname As String Dim c As String Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1") \'Dim nd As WinForm.TreeNode Value = e.Node.FullPath.Split("\\") Select Case e.Node.Level Case 0 Case 1 Dim nd As WinForm.TreeNode = tr.SelectedNode For i As Integer = 0 To Tables("客户表").Cols.Count - 1 c=Tables("客户表").Cols(i).name If c=nd.name Then i=Tables("客户表").Cols.Count End If Next Filter ="c= \'" & Value(1) & "\' \'就是这列不知如何编写 End Select DataTables("客户表").LoadFilter = Filter DataTables("客户表").Load() Filter ="c= \'" & Value(1) & "\' 我是想在这行语句中用变量作为列名来组成条件，我的目录树是这样的： 客户类型 普通 VIP 特殊 客户等级 A级 B级 还有很多，这里就不一一列了，如果选取的节点是“VIP”，则Filter ="[客户类型] = \'" & Value(1) & "\'"，请问如何用列变理来取代"[客户类型] = \'" & Value(1) & "\'"

--  作者：mr725 --  发布时间：2011/11/21 20:56:00 --   Filter =" " & c & " = \'" & Value(1) & "\' " [此贴子已经被作者于2011-11-21 20:56:39编辑过]

--  作者：amanda111 --  发布时间：2011/11/21 21:56:00 --   非常感谢，受教了！！！