专家坐堂-提示未找到列Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  提示未找到列  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79296)

--  作者：文道古月
--  发布时间：2015/12/28 16:35:00
--  提示未找到列

老师好，下面的代码有什么问题？怎么一直提示未找到列？

Dim fiter As DataRow = DataTables("库存查询").Find("[移动单元] = "& st &"")
If fiter IsNot Nothing Then
    Tables("转移过账_筛选Table1").Filter = ("[移动单元] = "& st &"")
Else Tables("转移过账_筛选Table1").Filter = ""
    MessageBox.show("选定区域不存在,请重新输入!")
End If

--  作者：大红袍
--  发布时间：2015/12/28 16:49:00
--

Dim fiter As DataRow = DataTables("库存查询").Find("[移动单元] = \'" & st & "\'")
If fiter IsNot Nothing Then
    Tables("转移过账_筛选Table1").Filter = ("[移动单元] = \'" & st & "\'")
Else Tables("转移过账_筛选Table1").Filter = ""
    MessageBox.show("选定区域不存在,请重新输入!")
End If