RosettaCodeData/Task/FizzBuzz/VBScript/fizzbuzz-2.vb

for i = 1 to 16
	wscript.stdout.write fb(i) & " "
next
wscript.echo

for i = 1 to 16
	wscript.stdout.write fb2(i) & " "
next
wscript.echo