【发布时间】:2013-09-26 06:22:09
【问题描述】:
这段代码之前运行良好,但今天它没有给我任何价值。而可能的结果值已经在相关表中可用。这是有问题的查询。
Private Sub BR_ID_LostFocus()
Dim s As String
s = "Select Seat_No.Seat_No FROM Seat_No Where Seat_No.Seat_No <= (select br_info.Seats_Reserved from br_info where Br_info.br_id=forms!pasenger_detail!br_id) AND (Seat_No.Seat_No) NOT IN (SELECT pasenger_detail.seat_no FROM pasenger_detail);"
Me.Seat_No.RowSource = s
Me.Seat_No.Requery
End Sub
【问题讨论】:
-
1.子查询 NOT IN (SELECT pasenger_detail.seat_no FROM pasenger_detail) 中没有过滤;可以吗? 2. 表格passenger_detail 是否打开? 'debug.print forms!pasenger_detail!br_id' 在即时窗口中打印什么?
-
你的建议是对的,我已经把过滤器放在那里并得到了结果,谢谢。
-
我应该把它写成答案吗?
-
是的,您可以将其写为答案。它解决了我发生的问题。
-
但是在应用这个之后我发现了其他一些新的逻辑错误。我正在查看它们以了解它们发生的原因。如果我没有解决方案,我会再次来这个论坛寻求帮助。
标签: ms-access ms-office vba ms-access-2010