You got it right
When I spend too much time with b4p I get tired and start asking silly questions.
If Click = 20 Then
bX1 = 70 : bX2 = 70
BlackPoints() = Array((bX1,bY1),(bX2,bY2),(bX3,bY3),(bX4,bY4))
Form1.Polygon(BlackPoints(),0,4,cBlack,F)
Return
End If
:sign0013: