用单引号:
adodata.recordsourse="select * from itemcode where itemname='bkt'"
如果bkt是一个变量,则这样写:
adodata.recordsourse="select * from itemcode where itemname='" & bkt & "'"
adodata.recordsourse="select * from itemcode where itemname='bkt'"
如果bkt是一个变量,则这样写:
adodata.recordsourse="select * from itemcode where itemname='" & bkt & "'"
一开始我是文本框做为查询条件的
adodatarecordsourse="select * from itemcode where itemname=txtsearch"可是它也是提示from子句有错,我在
属性窗口里将adodata的recordsourse写成语句还是说from子句有错,
这到底为什么啊?
adodatarecordsourse="select * from itemcode where itemname='" & txtsearch & "'"
on error resume next
if trim(text1)="" then
exit sub
end if
adodata.recordsourse="select * from itemcode where itemname='" & text1.text & "'"注:'" & text1.text & "'应为('"一个空格&一个空格text1.textg 一个空格&一个空格"')
adodata.refresh
set datagrid1.datasourse=adodata.recordsourse
end sub
adodata.recordsourse="select * from itemcode where itemname=" & "bkt"
adodata.recordsourse="select * from itemcode where itemname='bkt'"
如果bkt是变量
adodata.recordsourse="select * from itemcode where itemname='" & bkt & "'"
private sub command1_click()
on error resume next
if trim(text1)=="" then
exit sub
end if
adodata.recordsourse="select * from itemcode where itemname='" & me.text1.text &"'"
adodata.refresh
set datagrid1.datasourse=adodata.recordsourse
end sub
on error resume next
if trim(text1)=="" then
exit sub
end if
adodata.recordsourse="select * from itemcode where itemname='" & text1.text &"'"
adodata.refresh
set datagrid1.datasourse=adodata.recordsourse
end sub
改成 set datagrid1.datasourse=adodata.recordset
adodata.refresh
set datagrid1.datasourse=adodata.recordsourse