fork(1) download

copy

Imports System
Imports System.Text.RegularExpressions
Module Module1
Sub Main()
Dim SomeRegex As New Regex("\d{3}")
Dim Subject As String = "AAA123456"
Dim NewString As String = SomeRegex.Replace(Subject,
                    Function(m As Match)
                        If (m.Groups(0).Value = "123") Then
                            Return "111"
                        Else 
                            Return "000"
                        End If
                     End Function                        
                    )
Console.WriteLine(NewString)
Console.WriteLine(vbCrLf & "Press Key")
 Console.ReadKey()
End Sub
End Module
 
 

Visual Basic.Net Compiler version 0.0.0.5914 (Mono 2.4.2 - r)
Copyright (C) 2004-2008 Rolf Bjarne Kvinge. All rights reserved.


/home/z68HEq/prog.vb (8,1) : Error VBNC90019: Expected ')'.
Error recovery not implemented yet.
/home/z68HEq/prog.vb (8,30) : Error VBNC90019: Expected 'End'.
Error recovery not implemented yet.
/home/z68HEq/prog.vb (8,30) : Error VBNC30205: Expected end of statement.
Error recovery not implemented yet.
Error recovery not implemented yet.
/home/z68HEq/prog.vb (9,1) : Error VBNC99999: vbnc crashed nearby this location in the source code.
/home/z68HEq/prog.vb (9,1) : Error VBNC99999: Unexpected error: Object reference not set to an instance of an object
  at vbnc.Parser.ParseFunctionSignature (vbnc.ParsedObject Parent) [0x000bb] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser(Members).vb:328 
  at vbnc.Parser.ParseFunctionDeclaration (vbnc.TypeDeclaration Parent, vbnc.ParseAttributableInfo Info) [0x00031] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser(Members2).vb:305 
  at vbnc.Parser.ParseTypeMembers (vbnc.TypeDeclaration Parent, vbnc.MemberDeclarations Members) [0x003f9] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser.vb:1397 
  at vbnc.Parser.ParseTypeMembers (vbnc.TypeDeclaration Parent) [0x0000c] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser.vb:1322 
  at vbnc.Parser.ParseModuleDeclaration (vbnc.ParsedObject Parent, vbnc.Attributes Attributes, System.String Namespace) [0x00068] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser(Types).vb:274 
  at vbnc.Parser.ParseTypeDeclaration (vbnc.ParsedObject Parent, vbnc.Attributes Attributes, System.String Namespace) [0x000c4] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser.vb:1446 
  at vbnc.Parser.ParseAssemblyMembers (vbnc.AssemblyDeclaration Parent, System.String RootNamespace, vbnc.MemberDeclarations declarations) [0x001a8] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser.vb:1482 
  at vbnc.Parser.ParseAssemblyDeclaration (System.String RootNamespace, vbnc.AssemblyDeclaration assembly) [0x00092] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser.vb:433 
  at vbnc.Parser.Parse (System.String RootNamespace, vbnc.AssemblyDeclaration assembly) [0x00002] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/Parser/Parser.vb:58 
  at vbnc.Compiler.Compile_Parse () [0x0006d] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/General/Compiler.vb:363 
Compilation took 00:00:00.6319010

Standard output is empty