Question : maxclient Id from table

get max client id with format CL000000.  Please look at the MaxClientID.doc that i have attached.  If you have any question feel free to ask.  I appreciate any help.  Thanks.

Answer : maxclient Id from table

Function getClientID() As String
Dim MaxID, CurrID

MaxID =nz(DMax("mid([Client_ID],3)", "dbo_tblClientTest"),0)
maxid=clng(maxid)+1  
CurrID = "CL" & Format(MaxID, "00000000")
getClientID = CurrID
End Function