
新人求助用qwt根据数组绘制坐标图
展开全部
dim p(b.length-1) as point
for i as integer=0 to b.length-1
p(i).x=b(i)
p(i).y=h-a(i)'这里h是你要绘制曲线 的控件的高度
next
然后在窗体或者picturebox的paint事件中:
' 画笔
Dim blackPen As New Pen(Color.Black )
'绘制曲线
e.Graphics.DrawLines(blackPen, p)
for i as integer=0 to b.length-1
p(i).x=b(i)
p(i).y=h-a(i)'这里h是你要绘制曲线 的控件的高度
next
然后在窗体或者picturebox的paint事件中:
' 画笔
Dim blackPen As New Pen(Color.Black )
'绘制曲线
e.Graphics.DrawLines(blackPen, p)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询