Imports System

​

Public Module Module1

    Public Sub Main()

        dim someNum as Decimal =7.5151 '5.01

        Console.WriteLine(someNum.ToString())

        someNum *= 100 '751.51

        Console.WriteLine(someNum.ToString())

        someNum = Math.Ceiling(someNum) '752\

        Console.WriteLine(someNum.ToString())

        someNum += (5- ((someNum + 5) mod 5))

        'Console.WriteLine((5-((someNum + 5) mod 5)).ToString)

        Console.WriteLine(someNum.ToString())

        someNum /= 100      

        Console.WriteLine(someNum.ToString())

    End Sub

End Module