dim tmp_text as string if trim(tex1.text)="" then tmp_text="" else tmp_text=" and 姓名='"& trim(text1.text) &"'" end ifselect * from tablename where 1=1 & tmp_text
dim str1 as string str1 = text1.text '加入联接数据库或其他连接代码 select * from 表名 where 字段like '% "& str1 &" %''加入显示输出代码'成功系数较高
楼主能否提问时说清楚点?
这个查询机制,不懂啊,不知道怎样去做,摸不到头绪,
就象这样,根据文本框txtLoginName的内容,
查询LoginName 字段为文本框txtLoginName的数据显示在表格中
rs.CursorLocation = adUseClient
rs.Open "select * from Manger where LoginName='" & txtLoginName.text & "'", cn, adOpenDynamic, adLockBatchOptimisticSet DataGrid1.DataSource = rs
if trim(tex1.text)="" then
tmp_text=""
else
tmp_text=" and 姓名='"& trim(text1.text) &"'"
end ifselect * from tablename where 1=1 & tmp_text
str1 = text1.text
'加入联接数据库或其他连接代码
select * from 表名 where 字段like '% "& str1 &" %''加入显示输出代码'成功系数较高