Search results

Private Sub cmdSearch_Click() If Len(txtSearchString) = 0 Or IsNull(txtSearchString) = True Then MsgBox "You must enter a search string." Else Dim dbs As DAO.Database Set dbs = OpenDatabase("e:\my documents\appeal.mdb") Dim...