If you are having trouble working out string concatenation, a good trick is to use a variable which you can then inspect:
Diff:
Dim SeatCondition As Variant
Dim X As Integer, Y As Integer
Dim WhereCriteria As String
'X = ...
'Y = ...
WhereCriteria = "SeatID = " & X & " And PlayID = " & Y
Debug.Print WhereCriteria ' Now look at the output in the Immediate Window (Ctrl+G)
SeatCondition = DLookup("Condition", "Play1", WhereCriteria)