'Declaration
Public Overloads Sub Pie( _
ByVal As Integer, _
ByVal As Single, _
ByVal As Single, _
ByVal As Color _
)
'Usage
Dim instance As Draw
Dim radius As Integer
Dim startAngle As Single
Dim endAngle As Single
Dim color As Color
instance.Pie(radius, startAngle, endAngle, color)