Content Supported by Sourcelens Consulting

VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
END
Attribute VB_Name = "IShape"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Option Explicit

' The IShape class module is an "abstract
'   class" that defines the IShape
'   interface.  (Properly speaking, this is
'   not an abstract class:  A true abstract
'   class cannot be used to create objects.
'   This class, like any class defined in
'   Visual Basic, can be used to create
'   objects -- but those objects would not
'   be particularly useful because, like
'   a true abstract class, there are
'   members with no implementation.)

' TimeTest method takes no arguments, and
' --------      its implementation is
'   always void -- that is, it executes
'   no code.  Its only purpose is to
'   illustrate early vs. late binding.
Public Sub TimeTest()
End Sub

Public Sub DrawToPictureBox(ByVal pb As PictureBox)
End Sub