I have the following code which filters a form for me, and it works fine, but I would like to add a sort order (based on two fields) to it. How can I do that?
Thanks, Judy
Code:
Private Sub cmdFilter_Click()
'Purpose: Create dynamic screen report using form frmVersionList
'Date: 04/30/17
Dim strWhere As String 'Criteria string
Dim lngLen As Long 'Length of criteria string to append to
'********************************************************************
'Look at search box(es) and build criteria string from non-blank ones
'********************************************************************
If Not IsNull(Me.txtFilterDesignName) Then
strWhere = strWhere & "([tblP_DesignName] LIKE ""*" & Me.txtFilterDesignName & "*"")"
End If
'********************************************************************
'Apply string as the form's filter
'********************************************************************
Me.Filter = strWhere
Me.FilterOn = True
End Sub
Thanks, Judy