RosettaCodeData/Task/Accumulator-factory/VBScript/accumulator-factory-2.vb

9 lines
99 B
VB.net
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
dim a
set a = new accumulator
x = a( 1 )
a 5
dim b
set b = new accumulator
b 3
wscript.echo a(2.3)