Long = 1 Or 2

public class Test

   Public Const MASK_READ_WRITE As Long = 1 Or 2
   public Shared Sub Main
        Console.WriteLine(MASK_READ_WRITE)
   End Sub
End class