access 报表VB不能正确读取

charliemailbox

我做了报表，里面数据想自动查询，但不能用。
第一次用报表，以前都是用输出到excel，其实access的报表更加有弹性。
那位高手，帮助。

admin

不是很明白你的需求,
报表可以正常打开啊?

charliemailbox

Private Sub Report_Load()
On Error GoTo Err_Report
Debug.Print Me.[Busline1], Me.[Busline2], Me![Busline3], Me![Busline4], Me![Busline5]

    Me!Busmonitor1 = DLookup("Busmonitor", "tbl_schoolbus", "tbl_schoolbus.busNo ='" & Me![Busline1] & "'") '"条件字段名 = '" & forms!窗体名!控件名 & "'"
    Me.Busmonitor2 = DLookup("Busmonitor", "tbl_schoolbus", "tbl_schoolbus.busNo ='" & Me![Busline2] & "'")
    Me.Busmonitor3 = DLookup("Busmonitor", "tbl_schoolbus", "tbl_schoolbus.busNo ='" & Me![Busline3] & "'")
    Me.Busmonitor4 = DLookup("Busmonitor", "tbl_schoolbus", "tbl_schoolbus.busNo ='" & Me![Busline4] & "'")
    Me.Busmonitor5 = DLookup("Busmonitor", "tbl_schoolbus", "tbl_schoolbus.busNo ='" & Me.[Busline5] & "'")
Exit_Report:
    Exit Sub
Err_Report:
    MsgBox Err.Description
    Resume Exit_Report
End Sub

这个语句读出的是错误的

站到终点站

我用的2010版的，运行代码也没有错误，朱老师是不是用的2003版？

charliemailbox

已经解决，查询的问题