Question

急求高手帮我解决一道VB编程题 关于速度时间曲线的 已知一点的速度 求速度时间曲线

例如已知C点的速度，要在新建的FORM2中画一个PICTURE 里面显示以时间为X轴 速度为Y轴的曲线。我是做模拟仿真的，。。。。对VB不太懂，希望高手帮忙解决，感激不尽

Answer 1

Private Function jiecheng(x As Integer) As Long '定义阶乘函数
jiecheng = 1
For i = 1 To x
jiecheng = jiecheng * i
Next i
End Function
Private Sub Command1_Click() 'sub求阶乘
a = InputBox("输入A"): b = InputBox("输入B"): c = InputBox("输入C")
sa = 1: sb = 1: sc = 1
For i = 1 To Val(a)
sa = sa * i
Next i
Print sa
For i = 1 To Val(b)
sb = sb * i
Next i
For i = 1 To Val(c)
sc = sc * i
Next i
s = sa + sb + sc
Print s
End Sub

Private Sub Command2_Click() '函数求阶乘
a = InputBox("输入A"): b = InputBox("输入B"): c = InputBox("输入C")
sa = jiecheng(Val(a)): sb = jiecheng(Val(b)): sc = jiecheng(Val(c))
s = sa + sb + sc
Print s
End Sub
很简单滴````自己看吧,加油学吧````
另外,团IDC网上有许多产品团购,便宜有口碑

Answer 2

知道速度和时间的关系式么？
如果有关系式就简单了。

追问

是的 点的速度已知，在FORM1窗口已经求出来，现在用全局变量求出，在FORM2中用空间PICTURE能不能帮我编出一个程序啊

追答

给我个邮箱，我发给你个画图程序

追问

borriesli@163.com 谢谢啦

Answer 3

用vb画曲线很费劲的，而且效果不是好，推荐你用画图控件Tchart

追问

毕业设计要求用这个，程序都编出来了，就差一个速度曲线要在里面实现。。。学机械的，不会，遂极度郁闷