findcust = Mid(Me.Text0, InStrRev(Me.Text0, " ") + 1) & " " & Left(Me.Text0, InStr(Me.Text0, " ") - 1)
' If Nz(DLookup("[city]", "customers", "[customer]= '" & findcust & "'")) Then
If DCount("[city]", "customers", "[customer]= '" & findcust & "'") > 0 Then
The findcust HAS the proper value in it and the customer field in the customers table has that same record (Primary Key), but the "THEN" code is not done ?