我想在picturebox中画一个双曲线,但怎么也画不成,后来简化到了最简形式,却出现了这种结果.不知道是怎么回事,还请给为大哥不吝赐教,谢谢!
代码如下:
Private Sub Command1_Click()
For x = 3 To 1200
y = Sqr((x ^ 2 / 9 - 1) * 4)
Picture1.PSet (x + 1200, 1200 - y)
Picture1.PSet (x + 1200, 1200 + y)
Next x
End sub

其实原方程就是:x^2/9 -y^2/4 =1

怎么没人回答?郁闷啊!

计算细节有问题，一般来说把解析几何以程序表示，抽象的时候很容易出问题，我觉得你并没有花多少时间仔细检查你计算的细节
比如条件啊什么的，总觉得你的程序太过于简单了，条件不太够，但我不想给你说完全的答案，你应该像hacker一样有钻研精神

呵呵，楼上的,顶你~~~