Syntax error 1

[samotek]

Could you help me find out the error, saying Syntax error in query expression 'afid >SELECT Min(T.afid) FROM TblClients1 As T)'
as in the following function :

Public Function str()
Dim StrSQL As String
StrSQL = " DELETE * FROM TblClients1 WHERE afid > SELECT Min(T.afid) FROM
TblClients1 As T)"
CurrentDb.Execute StrSQL

End Function

 

[JerryKlmns]

StrSQL = "DELETE * FROM TblClients1 WHERE afid > (SELECT Min(T.afid) FROM TblClients1 As T)

 

[samotek]

Thank you so much for your helpful answer. I have solved my problem !!