Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t As New uCalc.Transformer()
      Dim s As New uCalc.String()
      
      '// Implicitly set the Text property
      t = "Source text with foo."
      s = "bar"
      
      '// Use the objects in a standard way
      t.FromTo("foo", s.Text)
      t.Transform()
      
      '// Implicitly get the Text property
      Console.WriteLine(t)
   End Sub
End Module