包含vb.net制作历史曲线的词条

如何用VB.NET调用excel的画图命令，即用.NET得到一组点坐标后，调用excel根据点画出曲线图并显示在VB.NET里

你可以通过用VB.net控制excel，让excel生成曲线图，然后利用excelVBA将图输出，最后导入到VB.net就可以了。

成都创新互联公司专注于昆玉企业网站建设,成都响应式网站建设,购物商城网站建设。昆玉网站建设公司,为昆玉等地区提供建站服务。全流程按需网站策划，专业设计，全程项目跟踪，成都创新互联公司专业和态度为您提供的服务

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

你可以看下 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

简单说下思路吧，具体的代码可以查资料

首先要会画曲线图，有三种方法：

1、用mschar控件（vb6的）；2、用水晶报表；3、用word图表

x轴为时间，y轴为数据

要实现实时数据刷新，只要用定时器定时刷新曲线图的数据就可以了（x、y的数据重写）

构造Pen的时候可以指定粗细，如果你指定为1，并且放大了10倍，最后就成10了，所以你指定小点就行了，比如 Dim p As New Pen(Color.Black, 0.01) 最终绘制的线的粗细不会小于1

文章名称：包含vb.net制作历史曲线的词条
文章源于：http://shouzuofang.com/article/dosiese.html