主题：[求助]有点甜老师

不然你就改代码吧，如果是字符列

Dim Filter As String = "1=1"
Dim v1 As String = e.form.controls("textbox1").text
If v1 > "" Then
    filter &= " And zdffs >= '" & v1 & "'"
End If

http://www.foxtable.com/webhelp/scr/1284.htm