1樓:匿名使用者
不嫌煩的修改方案(在原有**的基礎上)
'.............
else
do while not rsab1.eof
l0.caption = trim(rsab1("tpb"))
rsab1.movenext
if rsab1.eof then exit do '每個rsab1.movenext後面都加這行**
l1.caption = trim(rsab1("tpb"))
rsab1.movenext
if rsab1.eof then exit do '每個rsab1.movenext後面都加這行**
l2.caption = trim(rsab1("tpb"))
rsab1.movenext
if rsab1.eof then exit do '每個rsab1.movenext後面都加這行**
l3.caption = trim(rsab1("tpb"))
'.............
'.............
if rsab1.eof then exit do '每個rsab1.movenext後面都加這行**
l99.caption = trim(rsab1("tpb"))
exit do '第100個標籤處理後要加這句,以免記錄超過100時還繼續迴圈浪費資源
'...........
簡潔一點的修改方案
dim i as integer '宣告標籤號變數i ,記錄集sqlab1和cn連線物件假設樓主已處理妥當
sqlab1 = "select 不良名詞 as tpb from backend_defect where 站點='" + trim(asd1.caption) + "'"
rsab1.open sqlab1, cn, adopenforwardonly, adlockoptimistic
if sqlab1.bof and sqlab1.eof then
exit sub
else
do while not rsab1.eof
me.controls("l" & i).caption=rsab1.fields("tpb")
rsab1.movenext
i=i+1
if i>99 then exit do '避免標籤號碼大於99出錯
loop
end if
set rsab1 = nothing
2樓:匿名使用者
建議label用空間陣列,這樣就不用乙個乙個列出來賦值,可以通過迴圈賦值,這樣就可以控制及時跳出迴圈,就不會出錯了。
3樓:匿名使用者
dim i as integer
on error resume next
for i=1 to rsab1.recordcountme.controls("l" & i).caption=rsab1.fields("tpb")
rsab1.movenext
next
vb6.0 sql語句使用變數為條件查詢時候報錯
4樓:閃星
"select * from company where comp =『 「 & sc & 」 』"
5樓:匿名使用者
select *from company where comp like '%" & sc& "%'" 具體使用方法看 like 語句
6樓:秋劍舞葉
樓主,怎麼解決後面的報錯
vb中執行sql總是報錯,214721900,總評成績附近有錯,可是我在sql查詢分析器裡執行了的
7樓:匿名使用者
你會不會單步執行,執行到txtsql 之後,獲取裡面的值,也就是轉義後的sql語句,放到
sql查詢分析器裡執行一下,看看結果,,如果正確,這不是這裡的問題,,如果錯誤,再來分析原因
vb中用sql查詢語句總是出現錯誤,請高人指點!
8樓:擺渡浮橋
access的sql語句中的文字型別值要用雙引號,而不是單引號。
將單引號改成雙引號試試。
sql="select * from [work] where xm=""" & cxxm & """ and xb=""" & cxxb & """ and dh=""" & cxdh & """"
9樓:匿名使用者
sql="select * from [work] where xm=' "& cxxm &" ' and xb=' "& cxxb &" ' and dh=' "& cxdh &" ' "
10樓:匿名使用者
檢查一下你的 cxxm、cxxb 和cxdh 中有沒有單引號?
另外,單引號和雙引號之間不要有空格,單引號和and之間有空格就好了。
你在這個語句的下面把sql列印出來看看麼。
sql中怎麼查詢名稱以,SQL中怎麼查詢名稱以 A
海天盛 1 建立測試表,如下圖。create table test col 1 id number,var varchar2 200 create table test col 2 id number,var varchar2 200 2 插入測試資料,如下圖。insert into test co...
vb中用sql的insert語句向資料庫新增新資料,但是總是
給出insert into的用法,增加資料 insert into table name column1,column2,values value1,value2,說明 1.若沒有指定column 系統則會按 內的欄位順序填入資料。2.欄位的資料形態和所填入的資料必須吻合。3.table name ...
在SQL中如何模糊查詢,請問如何在SQL語句中實現模糊查詢?
使用like 和 sql select from tablename where topicname like keyword 請問如何在sql語句中實現模糊查詢? 這是查詢tname中包含 你 的數 據select from teacher where tname like 你 這是查詢tname...