<Flags()> Public Enum Blub
None = 0
Test = 1
Bla = 2
Hmm = 4
Ok = 8
All = 16
End Enum

Function IsBlubInside(bla as blub, hmm as blub) as boolean
 
end function

dim b as blub = blub.ok or blub.bla
if IsBlubInside(b, Blub.bla) then ...