can anyone assist me on this...i want to convert 100 to 1.00 for example
100 = 1.00
200 = 2.00
1000 = 10.00
How do i do that. Please help me.

You need to parse in the value you want as a string, apply the formatting, then return the value as a string so that it shows the decimal places.

Private Function calc(ByVal valueIn As Double) As String

        Dim newValue As String

        newValue = Format(valueIn / 100, "0.00")

        Return newValue

    End Function

I hope this helps.