1樓:璀璨星空
你的資料庫設計不合理,
aa c
警察 王剛
警察 李明
b //b不應該有c欄位b警察
小偷類似的方法應該用 left join(左連線,是和一對多的情況)
select a.a,a.c from a left join b where a.a=b.a
2樓:解0人
這個用vba去做好點
用vba寫自定義函式
首先,建立乙個模組,寫入以下自定義函式:
function rcmerge(wherestr$)
dim rs as new adodb.recordset, sql$, resultstr$
sql = "select a,b,c from a where a='" & wherestr & "'"
rs.open sql, currentproject.connection, adopenkeyset, adlockreadonly
do while not rs.eof
resultstr = resultstr & "、" & rs!b & """" & rs!c & """"
rs.movenext
loop
rs.close
set rs = nothing
rcmerge = replace(resultstr, "、", "", 1, 1)
end function
然後,建立更新查詢,查詢的sql:
update b set b=rcmerge(a)
執行,ok!
注意,如果你實際操作的表名稱、欄位名稱和以上的a、b、a、b、c不一樣,用的時候以上表名和欄位名都要對應修改
access資料庫,如果a表中a欄位等於b表中b欄位,則把符合條件的a表中的b欄位和c字段值鏈結起來,
3樓:解0人
用vba寫自定義函式
首先,建立乙個模組,寫入以下自定義函式:
function rcmerge(wherestr$)
dim rs as new adodb.recordset, sql$, resultstr$
sql = "select a,b,c from a where a='" & wherestr & "'"
rs.open sql, currentproject.connection, adopenkeyset, adlockreadonly
do while not rs.eof
resultstr = resultstr & "、" & rs!b & """" & rs!c & """"
rs.movenext
loop
rs.close
set rs = nothing
rcmerge = replace(resultstr, "、", "", 1, 1)
end function
然後,建立更新查詢,查詢的sql:
update b set b=rcmerge(a)
執行,ok!
注意,如果你實際操作的表名稱、欄位名稱和以上的a、b、a、b、c不一樣,用的時候以上表名和欄位名都要對應修改
vb操作access資料庫,如何判斷表中是否存在某欄位
1.加個adodc空間 2.這個空間的資料來源連結到access 3.令 adodc1.recordsource select from table where 欄位 xx table是你的表名,xx是你要查詢的內容 adodc1.refresh if adodc1.recordset.record...
怎麼設定兩個主鍵在access資料庫表中
建立複合主鍵 可以指定多個欄位的組合用作表的主鍵,但是現在很 少這樣做。這種主鍵通常稱為複合主鍵。如圖2 23 所示,選擇要在複合主鍵中包括的多個欄位,然後單擊 工具 功能區選項卡中的鑰匙圖示。當然,如果在表設計中這些 欄位排列在一起會更有助於快速操作。開發人員強烈感覺到主鍵應該由資料庫中原本出現的...
怎樣實現access資料庫中的查詢
一點設計演示 1.選擇 建立 中的 其他 中的 查詢設計 2.此時彈出一個對話方塊,選中要查詢的表,然後 新增 3.此時注意到最下方的那個視窗。裡面就是指定查詢條件以及要返回的資訊的。4.欄位 這一項就是要選擇要返回的資訊項。這裡我全部選擇了。5.表 這一項就是要選擇要查詢的表。6.排序 這一項就是...