public Customer( string id, string name, Partner partner )
Public Sub New ( id As String, name As String, partner As Partner )