Private Sub ComboBox1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.Click
cmd2 = New OleDb.OleDbCommand("Select [Member_Id] From Member_Details EXCEPT select [M_Ids] from Books_Issue", cn)
' cmd2 = New OleDb.OleDbCommand(" Select Member_Id From Member_Details LEFT JOIN Books_Issue ON Member_Id =M_Ids Where ((M_Ids) Is Null)", cn)
da = New OleDbDataAdapter(cmd2)
ds = New DataSet
da.Fill(ds, "Members")
With Me.ComboBox1
ComboBox1.DataSource = ds.Tables(0)
ComboBox1.DisplayMember = "Member_Id"
End With
End Sub
您的查询是错误的。MS ACCESS中不存在“除外”。您可以通过以下结构轻松避免使用Except:
Select *
from tableA
where NOT EXISTS
...
要么
Select *
from tableA
where NOT IN
...
在您的情况下(如果M_Ids与Member_ID的类型相同):
Select [Member_Id] From Member_Details md
WHERE NOT EXISTS
(select [M_Ids] from Books_Issue WHERE [M_Ids] = md.[Member_ID])
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句