Refering to variables with Dlookup

Using my Data entry form I have a combo box to lookup my Customers ID. After selecting the approporate ID I go to the next field. in the before Update event procedure I have the following code.

'Dim VarX As Variant

'VarX = DLookup("[Account Type]", "Customers", "[Customer ID]= Me![Customer ID]")

'If VarX = "9" Then Me![Account Type] = "9"

What im trying to accomplish is automating various fields based on the customers account type.

The error I get is "The object doesn't contain the automation object "Me!Customer ID"

If I want to list every customer ID I would have to make 1000 entrys to make it work

'If [Customer ID] = "Sun" Then [Account Type] = "9"

HELP!

Rich1968

Try:

VarX = DLookup("[Account Type]", "Customers", "[Customer ID]= " & Me![Customer ID])