Mega Code Archive

 

Categories / VisualBasic Script / Data Type Functions

 

Use CInt to convert input value to integer

Sub cintDemo()     Dim varMyInput     Dim intMyVar As Integer          varMyInput = InputBox("Enter an integer:", "10 Is True, Other Numbers Are False")     intMyVar = CInt(varMyInput)     MsgBox CBool(intMyVar = 10) End Sub