... QBColor(i) Line -Step(Delta, Delta) Line -( X2, Y2 - Delta) Line -Step(-Delta, Delta) Line -( X1 + Delta, Y2) Line -Step(-Delta, -Delta) Line -( X1, Y1 + Delta) Line -Step(Delta, -Delta) End ... ( 280 0, 24000) Line (700, 500 )-( 280 0, 2400), vbRed ' Draw a red line from Location( 280 0,2400) to Location ( 180 0,900) Line -( 180 0, 900), vbRed ' Draw a red line from Location( 180 0,900) ... CmdTrianI_Click() ' Drawing a black triangle: METHOD I Line (700, 500 )-( 280 0, 2400) Line ( 280 0, 2400 )-( 180 0, 900) Line ( 180 0, 900 )-( 700, 500) End Sub Private Sub CmdTrianII_Click() ' Drawing...