To get any numbers contained in a string you can use the Val Function. The Val function uses the following syntax:
Val(String)
The following code gets any numbers contained in String, and puts it into a textbox
Dim sNum As String
sNum = "Year: 2000, date: 12"
' Text1 will contain 200012
Text1.Text = Val(sNum)
You can also convert numbers to different types. For example, the Int function converts any number to a Integer (whole number). The following code will display a message box with 123 in it.
Dim fNum As Single
fNum = 1234.90
Msgbox Int(fNum)
You can also use the following commands:
Int - Converts a number to a Integer
CLng - Converts a number to a Long
Hex - Converts a number to Hex
Comments