Sort Order using Code on a report

[NEWER USER]

I am trying to sort a report on a single field based on a Case selection. So
far I have...
Private Sub Report_Open(Cancel As Integer)
On Error GoTo Report_Open_Err
DoCmd.ShowToolbar "iTurns Command Bar", acToolbarNo
DoCmd.Maximize
Select Case Forms!PrintReportsDialog.Sort
Case 1 'IMC Number
Me.JNumber.Visible = False
(NEED CODE HERE)
Case 2 'Jobber Number
Me.Number.Visible = False
(NEED CODE HERE)
End Select

Report_Open_Exit:
Exit Sub

Report_Open_Err:
MsgBox Err.Description
Resume Report_Open_Exit
End Sub

When the report opens the above coode runs and ALWAYS sorts on the Number
field. I need a line of code within each Case that denotes sorting on Number
and JNumber. Can anyone help me? I have no sort order in my report query or
Sorting and Grouping properties defined. Thanks

 

[Douglas J. Steele]

You need to define the Sorting And Grouping properties, then use the
approach outlined in http://www.allenbrowne.com/ser-33.html at Allen
Browne's site.

 

[NEWER USER]

Thank nyou for the tips and link to document. Solved my problem. Thanks again