Tips for golfing in VBScript
Use an empty variable instead of ""



Uninitialized variables are set to a special value: empty.  When empty is cast to a string it becomes "".  

Contrived example (using z instead of ""):

s=InputBox(z)
For i=1To 5
    For j=1To i
        r=r&amp;s
    Next
    MsgBox r
    r=z
Next


For numeric types Empty is 0, and for booleans it is false.  This can cut down on initialization code.

a=inputbox("Enter Starting Value")
b=a
while done=0
    i=i+1
    b=b*2
    done=(b&gt;10000 or i&gt;10)
wend
msgbox "Your "&amp;a&amp;" rabbit(s) have turned into "&amp;b&amp;" rabbit(s) in "&amp;i&amp;" years."