CDbl function

CDbl( expression )

Converts expressions from one data type to a double. The parameter expression must be a valid string or numeric expression.

Example

Sub Main()
   Dim y As Integer
   y = 25555   ' The integer expression only allows for 5 digits.
   If  VarType(y) = 2 Then
   Print y
 
       x = CDbl(y)   ' Converts the integer value of y to a double
                     ' value in x.
       x = x * 100000   ' y is now 10 digits in the form of x.
       Print x
   End If
End Sub