以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]全文搜索功能问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=122505)
--  作者：81538475
--  发布时间：2018/7/26 23:27:00
--  [求助]全文搜索功能问题
用下面方法全局搜索，但是我的列里面是又日期列的。搜索的时候就会报错      从字符串“”到类型“Date”的转换无效。  如何解决呢

Dim s1 As String = e.Form.Controls("TextBox1").Text

For i As Integer = vars("row") To CurrentTable.Rows.Count - 1
    For j As Integer = vars("col")+1 To CurrentTable.Cols.Count - 1
        If CurrentTable.Rows(i)(CurrentTable.Cols(j).Name) = s1 Then
            vars("row") = i
            vars("col") = j
            CurrentTable.Select(i,j)
            Return 
        End If
    Next
    vars("col") = 0
Next
vars("col") = 0
vars("row") = 0
--  作者：有点甜
--  发布时间：2018/7/26 23:37:00
--  

If CurrentTable.Rows(i)(CurrentTable.Cols(j).Name) = s1 Then

 

改成

 

If cstr(CurrentTable.Rows(i)(CurrentTable.Cols(j).Name)) = s1 Then
--  作者：81538475
--  发布时间：2018/7/27 0:17:00
--  
多谢了。