Query with subform

[alpertunga65]

Hi,

I am trying to built a database but I have a problem in making query with subform.

I have 2 tables and 4 forms

Forms are ChzList, ChzList_Altform, ChzSnf and ChzSnf_Altform,
ChzSnf is the main form and others are subforms on it.

I can query Form ChzSnf by Form ChzSnf_Altform using the code below;

Private Sub Form_Click()
Dim rs As Object

Set rs = Forms![ChzSnf].Recordset.Clone
rs.FindFirst "[ChzSnfID] = " & Str(Nz(Me![ChzSnfID], 0))
If Not rs.EOF Then Forms![ChzSnf].Bookmark = rs.Bookmark

End Sub

Unfortunately the same method didn't work for the second part Form ChzList by Form ChzList_Altform.

here is my attachment...

I need your help...
Thanks.