Imports System Imports uCalcSoftware Public Module Program Public Sub Main() Dim uc As New uCalc() Dim t = uc.NewTransformer() t.FromTo("abc", "changed to xyz") t.FromTo("Quote1({arg})", "'{arg}'") t.FromTo("Quote2({arg%})", "'{arg}'") Console.WriteLine(t.Transform("Quote1(abc), Quote2(abc)")) End Sub End Module