Although its not possible to declare variables with specific types in VBS as you would in VB or VBA, there are several conversion functions that will ensure that your variable contain the data type that you desire.
CBool, CByte, CCur, CDate, CDbl, CInt, CLng, CSng, CStr
for instance
Option Explicit
Dim x
x = "1"
WScript.Echo TypeName(x)
x = CInt("1")
WScript.Echo TypeName(x)
x = CInt(1)
WScript.Echo TypeName(x)
produces
String
Integer
Integer
Just beware that passing unconvertable values into a conversion function may cause Type mismatch errors. For instance, a string like "x9x" cannot be converted to a number so CInt("x9x") will cause a runtime error that halts execution.