以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=95232)

--  作者:wgqcool
--  发布时间:2017/1/13 16:37:00
--  求助

老师好,最近使用foxtable表的时候,发现用日常工作—查找功能时候,只要要查找的数据在第一行就出现无法找到的情况,只要不在第一行就能找到!确认没有空格或多余字符,表是外部表,在SQL sever上的!为什么会出现这种情况呢?需要如何解决?
此主题相关图片如下:2728.png
按此在新窗口浏览图片

而且以下用find语句,然后在备货单号列随便输入一个字段,也会出现查找错误情况


       Dim ds As DataRow = DataTables("备货单").Find("备货单号 = \'" & e.NewValue() & "\'")
        If ds IsNot Nothing Then
          ’ e.cancel = True
           messagebox.show("备货单号重复,请重新输入!")
       End If

 

 


此主题相关图片如下:4435.png
按此在新窗口浏览图片
[此贴子已经被作者于2017/1/13 16:47:39编辑过]

--  作者:有点色
--  发布时间:2017/1/13 16:59:00
--  

1、自带的,是从当前行往下查,不包括当前行。

 

    你可以自己做一个类似的查询窗口

 

Dim str As String = e.Form.Controls("TextFind").text

With Tables("表A")
    Dim r As Integer
    r = .FindRow("第一列 like \'%" & str & "%\'", .Position+1, True)
    If r > - 1 Then \'如果找到符合条件的行
        .Position = r \'则选择该行
    End If
End With
 
2、代码请写到datacolchanging事件,而不是datacolchanged事件

--  作者:wgqcool
--  发布时间:2017/1/13 22:50:00
--  
谢谢老师!