Question

How to use a bitwise operator to pass multiple Integer values to a function for VB.NET

Answer 1

Imports System

Public Class Program
    Const ONE As Integer = &H01
    Const TWO As Integer = &H02
    Const THREE As Integer = &H04
    Const FOUR As Integer = &H08

    Public Shared Sub MultiValueExample(ByVal values As Integer)
        If (values And ONE) = ONE Then
            Console.WriteLine("ONE")
        End If

        If (values And TWO) = TWO Then
            Console.WriteLine("TWO")
        End If

        If (values And THREE) = THREE Then
            Console.WriteLine("THREE")
        End If

        If (values And FOUR) = FOUR Then
            Console.WriteLine("FOUR")
        End If
    End Sub

	Public Shared Sub Main()
        MultiValueExample(ONE Or THREE Or FOUR)
    End Sub
End Class

 
  
' run:
'
' ONE
' THREE
' FOUR
'

 

70+ SQL courses for beginners and professionals