对数是什么我都忘光了。我画个坐标吧,你新建个程序把我这拷上看看。其中scale是重新定坐标系。
Private Sub Form_Resize()
Cls
Form1.Scale (-5, 6)-(7, -8) '四个数不一样,可以对照着结果看scale的用法,如果把四个数用form1的width和height替换下来,新坐标就不扭曲了。
Form1.Line (-5, 0)-(7, 0), vbRed '画横坐标
For i = -5 To 7
Form1.Line (i, 0)-(i, 0.5), vbRed '标横坐标刻度
Print i
Next
Form1.Line (0, -8)-(0, 6) '画纵坐标
For i = -8 To 6
Form1.Line (0, i)-(0.5, i) '标纵坐标刻度
Print i
Next
End Sub
分我也不要,来点实际的吧.
PS 来点实际的都不明白啊,你还是回炉重造吧。
双对数坐标系是什么?