Try this:
I copied it from ScaleLeft, ScaleTop Properties Example in VB6 Help.Code:Picture1.ScaleTop = -1 ' Set scale for top of grid. Picture1.ScaleLeft = -1 ' Set scale for left of grid. Picture1.ScaleWidth = 2 ' Set scale (-1 to 1). Picture1.ScaleHeight = 2 Picture1.Line (-1, 0)-(1, 0) ' Draw horizontal line. Picture1.Line (0, -1)-(0, 1) ' Draw vertical line.
------------------
Marty


Reply With Quote