vb点虐绘制折线图数据用vba生成折线图

vb点虐画灭仙折线图的方法

For i = 0 To ListBox1.Items.Count - 1

让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：国际域名空间、虚拟主机、营销软件、网站建设、梅县网站维护、网站推广。

a(i + 1) = ListBox1.Items(i)

你想说什么？？你可以将数据库里面查询出来的结果保存在dataset中，直接赋值给chart的datasource。自动生成折线！

。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

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

网站标题：vb点虐绘制折线图数据用vba生成折线图
网站URL：http://6mz.cn/article/ddeggdc.html