Question

How to calculate the LCM (Least Common Multiple) of two integers in VB.NET

Answer 1

Module Module1

    Sub Main()

        Dim a As Integer = 12, b As Integer = 20

        Dim lmc As String = If(a > b, a, b)

        While (True)

            If (lmc Mod a = 0 And lmc Mod b = 0) Then
                Console.Write("The LCM (Least Common Multiple) of {0} and {1} is: {2}", a, b, lmc)
                Exit While
            End If
            lmc += 1

        End While

    End Sub

End Module

' run:
' 
' The LCM (Least Common Multiple) of 12 and 20 is: 60

 

70+ SQL courses for beginners and professionals