'Declaration
Public Overloads Sub Pie( _
ByVal As Point, _
ByVal As Point, _
ByVal As Single, _
ByVal As Color _
)
'Usage
Dim instance As Draw
Dim upperLeft As Point
Dim lowerRight As Point
Dim endAngle As Single
Dim color As Color
instance.Pie(upperLeft, lowerRight, endAngle, color)