vb.net多曲线图 vb画曲线

vb.net绘制曲线图

。net 其实还是很好绘制图形的

创新互联是一家专业提供吉林企业网站建设,专注与做网站、网站建设、成都h5网站建设、小程序制作等业务。10年已为吉林众多企业、政府机构等服务。创新互联专业的建站公司优惠进行中。

你可以看下 Graphics 类

Dim d As New Bitmap(Me.Width, Me.Height) ‘一个图片吧

Dim g As Graphics = Graphics.FromImage(d)’绘制准备在这个图片是进行

然后就是你绘制的东西了

线就是 g.DrawLine()

圆弧度就用 g.DrawArc(Pens.Black, New Rectangle(0, 0, 400, 200), 0, 360)

复杂的就是 g.DrawBezier()

等如果你用的是 VS的编译上面都有详细的参数说明

Dim d As New Bitmap(Me.Width, Me.Height)

Dim g As Graphics = Graphics.FromImage(d)

g.DrawArc(Pens.Black, New Rectangle(0, 0, 200, 200), 0, 360)

g.DrawLine(Pens.Red, New Point(0, 0), New Point(200, 200))

g.DrawLines(Pens.Green, New Point() {New Point(0, 0), New Point(50, 40), New Point(50, 80), New Point(90, 70), New Point(100, 400)})

g.DrawBezier(Pens.Yellow, New Point(0, 100), New Point(0, 0), New Point(200, 0）， New Point(200, 200))

g.Dispose()

Me.BackgroundImage = d

您好，您是想问vb.net连续绘制曲线图不消失怎么办？b.net连续绘制曲线图不消失的解决办法如下：

1、首先必须创建bitmap,关联到picturebox1.image上。

2、再在picturebox1.image上创建Graphics,再进行作图。即可显示线图。

Private Sub Form_Load()

MSChart1.chartType = VtChChartType2dLine

Dim arrValues()

ReDim arrValues(1 To 5, 1 To 6)

Dim i As Integer

For i = 1 To 5

arrValues(i, 1) = "t" i 'x轴

arrValues(i, 2) = 0 + Rnd * 100 '第一条线

arrValues(i, 3) = 0 + Rnd * 100 '第二条线

arrValues(i, 4) = 0 + Rnd * 100 '第三条线

arrValues(i, 5) = 0 + Rnd * 100 '第四条线

arrValues(i, 6) = 0 + Rnd * 100 '第五条线

Next i

MSChart1.ChartData = arrValues

分享标题：vb.net多曲线图 vb画曲线
文章地址：http://ybzwz.com/article/dopjsjp.html