以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  like筛选日期列  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=73505)
--  作者：一笑
--  发布时间：2015/8/20 11:55:00
--  like筛选日期列
想通过文本框的text.changed事件进行删选，文本列的筛选正常，如何进行日期列的筛选？谢谢

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("事务主表")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "\'%" & txt & "%\'"
    tbl.Filter = "主题 Like " & txt & " Or 开始日期 Like "# %" & txt & "% #"   
End If
--  作者：大红袍
--  发布时间：2015/8/20 12:16:00
--  
tbl.Filter = "主题 Like " & txt & " Or Convert(开始日期, \'System.String\') Like "" & txt & ""   
[此贴子已经被作者于2015/8/20 12:16:28编辑过]
--  作者：一笑
--  发布时间：2015/8/20 15:22:00
--  
报错：

图片点击可在新窗口打开查看此主题相关图片如下：搜狗截图15年08月20日1517_1.jpg
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2015/8/20 15:31:00
--  
tbl.Filter = "主题 Like " & txt & " Or Convert(开始日期, \'System.String\') Like ‘%" & txt & "%\'" 
--  作者：大红袍
--  发布时间：2015/8/20 15:34:00
--  
tbl.Filter = "主题 Like " & txt & " Or Convert(开始日期, \'System.String\') Like " & txt