'Declaration
Public Overloads Sub Circle( _
ByVal As PointF, _
ByVal As Single, _
ByVal As Color, _
ByVal As Single _
)
'Usage
Dim instance As Draw
Dim location As PointF
Dim radius As Single
Dim color As Color
Dim aspectRatio As Single
instance.Circle(location, radius, color, aspectRatio)