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