Val function
Val( string )
Returns the numeric value of a string of characters.
Example
Sub Main
   Dim Msg
   Dim YourVal As Double
   YourVal = Val(InputBox$("Enter a number"))
   Msg = "The number you entered is: " & YourVal
   MsgBox Msg
End Sub