VB 一张图中绘制多条实时曲线

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/07/16 17:51:53

VB 一张图中绘制多条实时曲线
四个text分别实时生成随机数,然后将text里值分别赋给四个Y,以时间为横坐标,在一张图里绘制这四个Y.

以下是我的代码,错误的.请指教.谢谢. 再次补充问题,四个text中分别显示的是实时采集的数据,所以这里我分别用模拟数对其赋值,当form加载的时候即开始产生随机数,然后以时间为横坐标,text中的值分别赋给四个Y,在picture1里同时绘制四个曲线.也可以建立access数据库,然后将数据存入数据库.本人初学VB,指定犯了许多无知的错误,恳请帮助.非常感谢.

Private Sub Form_Load()

Timer1.Enabled = True

End Sub

Private Sub Timer1_Timer()

Randomize

Text1.Text = 900 + Rnd * 10

Text2.Text = 900 + Rnd * 15

Text3.Text = 900 + Rnd * 20

Text4.Text = 900 + Rnd * 25

Y1 = Text1.Text

Y2 = Text2.Text

Y3 = Text3.Text

Y4 = Text4.Text

x = x + 1

Picture1.Cls

Line1.Y1 = Val(Text1.Text)

Line1.Y2 = Val(Text2.Text)

Line1.Y3 = Val(Text3.Text)

Line1.Y4 = Val(Text4.Text)

End Sub

可以实现速度呢横向还是纵向刷新绘图啊你看是这样做吗代码在窗口里有显示了

再问： timer的时间间隔暂定为1000，横向刷新，数据满后最新数据作为最后的点绘制。
再答：这样2张图片就代码全了参数要根据图片大小定义

你刚才没有说是用timer来做我这个是用跳转循环做的你自己改一下就可以了我做电机震动检测仪软件就是这样写的有什么问题可以QQ留言另外分少了：）

VB 一张图中绘制多条实时曲线 matlab绘制多条曲线如何在Origin中绘制多条曲线 origin怎么绘制多条曲线用VB绘制正弦动画曲线 Origin在一个坐标系中绘制多条曲线(在线等) 在MATLAB中一个图中绘制多条曲线时,选择的多项式也是选择同一种,怎样知道选择多项式拟合的精度哪个最好. matlab由三条曲线怎么绘制曲面图 c#chart如何绘制两条曲线在origin中如何把不同数量级的两条曲线画在一张图上? 在Matlab中,如何绘制sin(x)和cos(x)二条曲线在proe中分别在front与top面上绘制两条曲线,通过编辑相交生成第三曲线.我想问一下第三曲线是怎样形成的