Filter a list box by field on a form

I have a [Manager Bid Tab Data Subform] subform with fields: [Proj No],
[Std 
No], and others.  The [Proj No] is filled by a field in the master form. 
The 
[Std No] is filled by selecting a value from [StdNoList] list box. The
list 
box shows the std no for all proj no, I would like it to show the std no
for 
the Proj No selected on the form.  


After Update Event Procedure for [Proj No] text box on the subform:
     Private Sub Proj_No_AfterUpdate()
          Me!StdNoList.Requery
     End Sub


Row Source for [StdNoList] List Box:
     SELECT [Line Item Quantities].[Std No], [Engineering Estimating 
Guide].Description, [Engineering Estimating Guide].Unit
     FROM [Line Item Quantities] INNER JOIN [Engineering Estimating Guide]

ON [Line Item Quantities].[Std No] = [Engineering Estimating Guide].[Std
No]
     GROUP BY [Line Item Quantities].[Std No], [Engineering Estimating 
Guide].Description, [Engineering Estimating Guide].Unit, [Line Item 
Quantities].[Proj No]
     HAVING ((([Line Item Quantities].[Proj No])=[Forms]![Manager Bid Tab 
Data Subform]![Proj No]))
     ORDER BY [Line Item Quantities].[Std No];


Every time the form is run, the user is asked to input the
“[Forms]![Manager 
Bid Tab Data Subform]![Proj No]” parameter.