Public Class ModuleState Public Name As String Public Sub New(Name As String) Me.Name = Name End Sub End Class