like a bitwise and,

I've definded constants const_add 1, const_sub 2, const_div 4 ,, 8 , 10 , 20
etc

if CheckBox_Add.Value = True Then
lChecks = lChecks And const_Add
End If

If CheckBox_Sub.Value = True Then
lChecks = lChecks And const_Sub
End If


I'd like pass lChecks to a function and have that function do something like

if lChecks and const_add = true then
......


It all looks ok but my lines like lChecks = lChecks And const_Add don't set
lChecks to anything

Thanks