VB中怎么设置坐标系

1、一个对象开始有自己默认的坐标系，系统默认左上角为坐标原点（0,0），水平向右为X轴正方向，竖直向下为Y轴正讨三方向；ScaleMode属性决定量腊蕉净度单位。

2、用户自己定义坐标系，一般用Scale方法自定义。

[对象].scale（xLeft，yTop）-(xRight,yBottom)

3、例如在窗体下建立坐标代码如下：

Private Sub Form_Activate()

   Form1.Scale (-100, 100)-(100, -100) '自定义坐标系涛何

   Line (-100, 0)-(300, 0) '画X轴

   Line (0, 100)-(0, -150) '画Y轴

   DrawWidth = 10 '设置圆形宽度

   Form1.Circle (0, 0), 0, vbRed '绘制红色圆心

   CurrentX = 0: CurrentY = 0: Print "(0,0)" '原点坐标

   CurrentX = 90: CurrentY = 10: Print "X轴" '标记X轴

   CurrentX = 5: CurrentY = 95: Print "Y轴" '标记Y轴

End Sub