点击连续窗体某一项数据栏显示对应子窗体

Henry D. Sy

没发现你所说的窗体

Henry D. Sy

Public strName As String
Public a As String
Public b As String

Private Sub 进料量_DblClick(Cancel As Integer)
    ' strName = Me!进料量
    a = Me.采购单号
    b = Me.物料代码
    DoCmd.OpenForm "物料_进料明细表 子窗体", acFormDS, , "采购单号='" & a & "' and 物料代码='" & b & "'"
End Sub