求助:关于两个子窗体的问题

silicon

我想做一个窗体,含有两个子窗体.

显示效果和Access本身带的例子 Northwind里的order窗体相似:包含Customer Orders, Customer Orders Subform1,和Customer Orders Subform2.





但是老是没有搞明白的是, 点击第一个子窗体中的某记录, 第二个子窗体随之显示相应条件下的记录. 这个功能是如何实现的啊???

silicon

Thank you!

I made it!

naiba

Private Sub CUSTOMER_DblClick(Cancel As Integer)

SEL

End SubPrivate Sub DRWG_DblClick(Cancel As Integer)

SEL

End SubPrivate Sub ID_DblClick(Cancel As Integer)

SEL

End SubPrivate Sub PART_DblClick(Cancel As Integer)

SEL

End SubPrivate Sub PARTDESC_DblClick(Cancel As Integer)

SEL

End SubPrivate Sub PROD_DEPT_DblClick(Cancel As Integer)

SEL

End SubPrivate Sub SALE_DEPT_DblClick(Cancel As Integer)

SEL

End Sub

Private Sub SEL()

If MsgBox("要对该记录进行修改吗?", vbYesNo + vbQuestion, "修改确定") = vbYes Then

Dim stID As String

    stID = VAL(Me.ID)

Form_新品登录.RecordSource = "SELECT * FROM 新品查询 WHERE 新品查询.ID=" & stID & ""

Else

MsgBox "修改操作被取消!!"

End If

End Sub自己看看吧,应该可以看的懂

Plex

参照两个地方1、Customer Orders Subform1-->On Current事件2、Customer Orders Subform2-->Record Source(即Order Details Extended查询)