I think the above solution is not elegant.
I think
If (i Mod 3 = 0) Then
WScript.Echo "Fizz"
End If
If (i Mod 5 = 0) Then
WScript.Echo "Buzz"
End If
because it covers the “both” case automatically. OK you have to care about line breaks which I don’t know in VBS (never used that crap, thank goodness).