Question

How to count the trailing zeros in a binary number using VB.NET

Answer 1

Imports System
Imports System.Runtime.InteropServices

Class Program
    Private Shared Function CountTrailingZeros(ByVal number As Integer) As Integer
        Dim INTEGER_SIZE As Integer = Marshal.SizeOf(GetType(Integer)) * 8

        Dim mask As Integer = 1

        For i As Integer = 0 To INTEGER_SIZE - 1
            If ((number And mask) <> 0) Then
                return i
            End If
            mask = mask << 1
        Next

        Return -1
    End Function

    Public Shared Sub Main(ByVal args As String())
        Dim number As Integer = 80
        
        Console.WriteLine("Number of Trailing Zeros: " & CountTrailingZeros(number))
    End Sub
End Class




' run:
'
' Number of Trailing Zeros: 4
'

 

70+ SQL courses for beginners and professionals