AfterUpdate Procedure

[Greg McLandsborough]

I have a combo, which I have assigned the following code to the afterupdate
Procedure

Private Sub Mark_Size_AfterUpdate()
Me.Size_Mass.Value = "SELECT " & Me.Mark_Type & ".[Mass (kg/m)] FROM " &
Me.Mark_Type & " WHERE ((" & Me.Mark_Type & ".[Size]) = " &
Me.Mark_Size.Text & ");"
End Sub

However the result
"SELECT CEA.[Mass (kg/m)] FROM CEA WHERE ((CEA.[Size]) = 150 x 150 x 8.0
CA);"
creates an error

Run-time error '2113'
The value entered inst valid for this feild.

The Feild is set to Double.

Any comments appreciated

Regard

Greg

 

[Allen Browne]

You cannot assign a query string to the field. Instead, use DLookup().

Details:
http://allenbrowne.com/casu-07.html