Imports System Imports uCalcSoftware Public Module Program Public Sub Main() Dim uc As New uCalc() Dim t As New uCalc.Transformer() Dim tokens = t.Tokens Console.WriteLine($"Total token definitions: {tokens.Count}") Console.WriteLine("--- Token List ---") Dim i = 0 For i = 0 To tokens.Count - 1 Dim tokenItem = tokens.At(i) Console.WriteLine($"{i}: {tokenItem.Name}") Next End Sub End Module