急求！！用vb画很难得函数图像

[jinbaozai]

x=at+b*sin(wt) ,y=b*(1-cos(wt))
h,e,v都为用inputbox输入的常数
a=e/h
w=(1.76*10^11)*h
b=((5.68*10^-12)*(h*v-e))/(h*h)
t为参数

[熊孩子开学喽]

[Quote=引用楼主 jinbaozai 的回复:]
x=at+b*sin(wt) ,y=b*(1-cos(wt))
h,e,v都为用inputbox输入的常数
a=e/h
w=(1.76*10^11)*h
b=((5.68*10^-12)*(h*v-e))/(h*h)
t为参数
[/Quote]

先根据T的累加算出X和Y的结果,存放到数组,然后根据X和Y的数组画曲线

[jessezappy]

一楼的正解,
我直接画了一下看看,感觉你的参数计算公式里面的参数有些怪怪的,试了好多次,在输入了如下参数后,才画的能看得过眼的图像,感觉有点像是自行车脚踏板的运动轨迹,你确认你参数计算公式里面的常数没错?
直接画图可用如下代码:
Picture1.PSet (x, y), vbRed
画出的一个图像如下: