RosettaCodeData/Task/Flatten-a-list/VBScript/flatten-a-list-2.vb

5 lines
197 B
VB.net
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
dim flat
set flat = new flattener
flat.itemSeparator = "~"
wscript.echo join( flat.flatten( array( array( 1 ),2,array(array(3,4),5),array(array(array())),array(array(array(6))),7,8,array())), "!")