怎样区分画线时的XY轴

来源：百度知道 编辑：UC知道 时间：2024/07/04 19:21:33
line(0,1)-(0,-1)
line(1,0)-((-1,0)
这是画出了正交的两条线吧 可是我直接运行不出图啊
该怎么弄呢
解释下这两句话吧
怎么样在窗口上以中心为原点然后画出坐标轴啊？

不知道你设置了坐标没有,如果没有的话,(0,1) 到(0,-1)这两个坐标你画出来,就在一点上,所以根本看不出来

你可以重新设置坐标系
Private Sub Form_Click()
Form1.Scale (-2, 2)-(2, -2) '加上这一句
Line (0, 1)-(0, -1)
Line (1, 0)-(-1, 0)
End Sub

你如果在FORM_LOAD 函数里添加这两项是没有用的
换成 FORM_CLICK 可以画 但是 由于两点的距离是按系统坐标来的 所以距离很小
给你个程序吧 、、
自己看看
Private Sub Form_Click()
ScaleLeft = -200: ScaleTop = 250: ScaleWidth = 500: ScaleHeight = -400
Line (-200, 0)-(300, 0): Line (0, 250)-(0, -150)
CurrentX = 0: CurrentY = 0: Print 0
CurrentX = 260: CurrentY = 20: Print "X轴"
CurrentX = 10: CurrentY = 240: Print "Y轴"
End Sub