重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
。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点虐 就可以了。
For i = 0 To ListBox1.Items.Count - 1
a(i + 1) = ListBox1.Items(i)
Next
你想说什么??你可以将数据库里面查询出来的结果保存在dataset中,直接赋值给chart的datasource。自动生成折线!