KB194206 ( : " Microsoft Jet SQL. ." ), , VBA.
VBA , VBA .
-:
Function BitAnd(Value1 As Long, Value2 As Long) As Long
BitAnd = Value1 And Value2
End Function
SQL
WHERE
BitAnd([someColumn], 64) > 0
, .
. , FlagsTable (FlagValue, FlagName), :
SELECT
d.Id,
d.BitField,
f.FlagName
FROM
DataTable d
INNER JOIN FlagsTable f ON BitAnd(d.BitField, o.FlagValue) > 0
"24 16 8".