1樓：
你的第乙個要求 我是菜鳥 首先想到的就是 每或銀耐多選擇乙個核取方塊 就往sql語句中多新增乙個and 最後整合出來的sql語句 才能完成查詢 這勢必要n個if語句來加以判斷 **很多 篇幅有限 沒法詳細給出。
第二個 我貼乙個我寫搏鬥的管理系統的** 供你參考 每句都有註釋。
private sub mshflexgrid1_dblclick()
tempyg = trim( 'tempyg存放我當前選中記錄的id
load 員工詳細資料 '調出用來顯示詳細資訊的視窗 但未顯示。
call runsql("select * from 員工資訊表 where 員工編號='"tempyg &
呼叫寫好的執行sql語句的過程 你可以把sql語句放到你自己的執行過程中。
with 員工詳細資料 '員工詳細資料 是修改的窗體名稱。
員工編號 'link 是查詢後返回的記錄集。
trim( 員工姓名 ' 第幾個欄位)
trim( 出生日期。
trim( 性別。
trim( 學歷。
trim( 員工類別。
trim( 入職日期。
trim( 衫春身份證號碼。
trim( 籍貫。
trim( 手機。
trim( 家庭住址。
trim( 郵編。
trim( 家庭**。
trim( 工作**。
trim( email
trim( 備註。
if trim( 是" then '是否在職。
true false
falsetrueend if
end with
員工詳細資料。show
員工詳細資料。
end sub
2樓：天使心
我給你解決第二個問題。
首先。你給查詢這個按鈕設定單擊命令。
**為：private sub 查詢_dblclick()查詢窗體。show: 查詢窗體。setfocusend sub
就是查詢結果在datagrid裡顯示之後，如何通過雙擊開啟彎鉛乙個視窗顯示的結果。
**如下。set =
set = 姓名"
學號" **"
系編號喊鬧歲"
簡歷" 住址鄭睜"
出生日期"email"
把裡面的屬性名換位你自己的表中的屬性名。
患有就是text文字框的名字也要對上。
這個就行了，希望對你有所幫助。
vb組合查詢
3樓：網友
1.最重要的問題結構不對。
應該是if...then
elseif...then
elseif...then
elseend if
而不該是現在的結構。
2.那個不行可能存在問題是樓房編號要是數值型的欄位，那麼where 樓房編號 = '" & "'"
應該改成。where 樓房編號 = " & ""
select * from 維護表 where 申請日期 like + '" & dtpicker1 & "'+ '%'"
這個不好這麼寫吧。
select * from 維護表 where 申請日期 = '" & dtpicker1 & "'"
這樣子好點。
怎麼樣實現vb組合查詢
4樓：網友
sqlstr = "select * from 基本資訊表 where i like '%" & text1 & "%' and j like '%" & text2 & "%'"
and旁邊少了空格。
5樓：長大了有毛毛
報錯還是其他什麼狀況？
vb+access 怎麼才能實現組合查詢
6樓：影沉_秋水
組合查詢有點不明白是什麼意思，不知道我這樣理解對不對就是查詢任一欄位的條件，然後出來整行資料嗎？
vb+access的問題如何實現組合查詢功能啊
7樓：網友
這不叫組合查詢。用where：
myopen="select * from 表 where true "攜衝。
if 合同編號<>"then myopen=myopen & and 合同編號='"合同編號 &
if 執**況<>"then myopen=myopen & and 執**況='"執**況 &
if 錄入人<>"then myopen=myopen & and 錄入人='"錄入人 &
if 物料描述<>"then myopen=myopen & and like '%物料描述 & 燃隱備"
if isdate(錄入日期)<>then myopen=myopen & and 錄入日期=#" &datevalue(錄入日期) &#
myopen
務必要去掉合同編號，執**況，錄入人，物料皮毀描述中的單引號，如：
合同編號=replace(合同編號，"'
vb資料庫 check控制項組合查詢 （急）
8樓：網海1書生
private sub command1_click()dim i as integer
dim a as string
for i = 0 to 2
if check1(i) = 1 thenif a <>"" then a = a & " or "
a = a & "goods.類別='" & check1(i).caption & "'"
end if
next i
select goods.名稱， goods.數量， goods.類別 from goods where " & a
end sub
vb 關於組合查詢怎樣實現？？？求助吖。╮(╯_╰)╭
9樓：匿名使用者
dim str as string
str= "select * from 書籍資訊 where 1=1"
if = vbchecked then
str =str & 書名='返純" &trim( &end if
if = vbchecked then
if trim(str) =then
str =str & 編號='"trim( &elsestr = str & and 編號='"trim( &巖睜。
end if
end if
if = vbchecked then
str =str & 作者='"trim( &end if
if = vbchecked then
str = str & and 圖書型別='"trim( &end if
if = vbchecked then
str = str & and 出版社='"trim( &漏棗咐 ")
end if
end if
str
vb組合框問題，如何取符號
private sub mand1 click select case bo1.text case text3.text val text1.text val text2.text case text3.text val text1.text val text2.text case text3.te...
vb中怎麼實現遮蔽Alt Tap的組合鍵
這個是系統的熱鍵,你要用hook鉤子才行,比較有難度 c 中怎麼遮蔽組合鍵 這樣就可以遮蔽了.modifiers keys.handled true,keyeventargs e if e.f4 e.keycode keys.alt eprivate void register keydown ob...
VB做的乙個管理系統中的查詢問題
個查詢條件，其組合有方式有 種大概有 種組合，如果使用判斷語句乙個條件乙個條件判斷，特別繁雜，這就需要程式設計技巧了，下面給你乙個思路 在選取核取方塊的事件中使用個判斷語句，判斷核取方塊i是否選中，如果選中，用乙個變數代替部分sql語句，例如使用者姓名 sql and 使用者年齡 sql and 使用者型別 sq...