fork download

copy

Imports System
 
Public Class Test
	Public Shared Sub Main()
		' your code goes here
 
  Dim x As cPermutations
  Set x = New cPermutations
 
  x.Text = "01010101"
 
  Do While x.PermutationsLeft
    Console.WriteLine Join(x.NextNPermutations(8), ", ")
  Loop
	End Sub
End Class

Visual Basic.Net Compiler version 0.0.0.5943 (Mono 3.8 - tarball)
Copyright (C) 2004-2010 Rolf Bjarne Kvinge. All rights reserved.

/home/PUPek4/prog.vb (8,8) : error VBNC90019: Expected 'End'.
/home/PUPek4/prog.vb (10,4) : error VBNC90019: Expected 'End'.
/home/PUPek4/prog.vb (12,5) : error VBNC30203: Identifier expected.
/home/PUPek4/prog.vb (13,12) : error VBNC30203: Identifier expected.
/home/PUPek4/prog.vb (14,7) : error VBNC30203: Identifier expected.
/home/PUPek4/prog.vb (15,9) : error VBNC30203: Identifier expected.
/home/PUPek4/prog.vb (16,10) : error VBNC30203: Identifier expected.
There were 7 errors and 0 warnings.
Compilation took 00:00:00.6215930

Standard output is empty