- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 請問哪裡錯誤?? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=59873)
-- 发布时间：2014/11/12 16:30:00
-- 請問哪裡錯誤??
Dim mData As String = e.Form.Controls("TextBox1").text
Dim mField As String = e.Form.Controls("TextBox2").text
Dim strs As String = mField
Dim Values() As String
Values = strs.split(",")
Dim flt As String = ""
If mData <> "" Then
For Index As Integer = 0 To Values.Length - 1
If Index = values.length-1 Then
flt = flt + values(Index) & " Like \'*" & mData & "*\'"
Else
flt = flt + values(Index) & " Like \'*" & mData & "* \' or "
End If
Next
End If
Tables(e.Form.Name & "_Table1").Filter = flt
-- 发布时间：2014/11/12 16:36:00
--
问问题，不要这样好不好。
你要说报什么错啊。自己弹出 msgbox(flt) 看看
-- 发布时间：2014/11/12 16:49:00
--
查詢時報錯!!
檔案傳了好幾次,無法傳上!!
[此贴子已经被作者于2014-11-12 16:59:16编辑过]
-- 发布时间：2014/11/12 16:51:00
--
你要把具体情况描述一下，这样就算高手也看不懂的
-- 发布时间：2014/11/12 16:51:00
--
檔案傳不上去,不知何故
-- 发布时间：2014/11/12 16:52:00
--
报什么错啊，弹出 msgbox(flt) 看看
-- 发布时间：2014/11/12 16:58:00
--
執行查詢時錯誤!!
截圖傳不上,不知何故!!
[此贴子已经被作者于2014-11-12 16:58:57编辑过]
-- 发布时间：2014/11/12 17:00:00
--
都让你弹下框看看咯msgbox(flt)
-- 发布时间：2014/11/12 17:00:00
--
[此贴子已经被作者于2014-11-12 17:02:25编辑过]
-- 发布时间：2014/11/12 17:01:00
--
先写下文字再传图就可以了