怎么用vba画三维曲线

05-08

求教用vba编程画出一个三维曲线，我想画的曲线如下所示
x=9*t y=8*t z=0.2*t^2
这种曲线好像在curve里面好像不好容易，所以特意向懂vba的高手讨教了。

可以哈，用3D ploygon

Sub main()
With Polygon3D
.Reset
.Name "3dpolygon_1"
.Curve "3D-Analytical"
Dim xxx As Double, yyy As Double, zzz As Double ,ttt As Double
For ttt = 0 To 100 STEP 0.2
xxx=9*ttt
yyy = 8*ttt
zzz = 0.2*ttt*ttt
.Point xxx , yyy , zzz
Next ttt
.Create
End With
End Sub
放入VBA中运行，改变t的范围，可以得到你需要的曲线