   Public Abstract Class IMyInterface
      Property MyProperty As Long
      Sub MySub(Optional ByVal intFoo As Integer = 0)
      Private Function MyFunction() As Double 
   End Class

   Public Class MyClass Implements IMyInterface
      Property MyAdditionalProperty := "Apple"
      Event MyEvent 
   End Class

   Private Collection MyCollection Of MyClass
   End Collection   

   Form frmMyForm
   End Form

   Module MyModule
      Sub Main
   End Module
