' Gambas module file Public Sub Main() Dim r As New UnitTest r.Test r.ShowTestForm End