网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vb.net数据库曲线 vb怎么根据数据绘制曲线

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

vb.net+Access数据库,按时绘制一天的数据的曲线,即24小时趋势曲线

1、2,有多少数据就画多少曲线,前或后没有就断开呗,前后都没有就画横线。

3,数据库按时间排序,选出最新时间值,然后根据这个值

,通过类似 select * from table where date#2010-8-20# and date#2007-8-23# 这样的语句选出往前两天的数据。

VB.NET 实时曲线

拖一个PictureBox1控件 创建一个Paint事件。在事件中加入 Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint ' Create pens. Dim redPen As New Pen(Color.Red, 3) Dim greenPen As New Pen(Color.Green, 3) ' Create points that define curve. Dim point1 As New Point(50, 50) Dim point2 As New Point(100, 25) Dim point3 As New Point(200, 5) Dim point4 As New Point(250, 50) Dim point5 As New Point(300, 100) Dim point6 As New Point(350, 200) Dim point7 As New Point(250, 250) Dim curvePoints As Point() = {point1, point2, point3, point4, _ point5, point6, point7} ' Draw lines between original points to screen. e.Graphics.DrawLines(redPen, curvePoints) ' Draw curve to screen. e.Graphics.DrawCurve(greenPen, curvePoints) End Sub 得到数据后,改point的数据。然后PictureBox1.Refresh()就行了

想在VB中根据数据库的数据画曲线变化图,如何画?用什么方法

VB提供的绘制图形的方法:(可以在窗体上或PicTureBox控件上使用)

与你主题相关的有:

1,绘制直线

object.Line (x1,y1) - (x2,y2), [color]

其中:(x1,y1) 和 (x2,y2)分别是平面上的两个点坐标。

2,绘制一点:

object.PSet (x,y), [color]

其中:(x1,y1) 是平面上的一个点坐标。

3,绘制图形的笔尖的粗细:

object.DrawWidth = size

默认粗细为1。

4,绘制图形的线条的颜色设置:

1)Object.ForeColor = QbColor(n) :n = 0 -- 15

2) 或者在使用上述方法时,在后边跟的参数[color]

思路:

绘制曲线,就是根据函数关系:y = f(x),采用描点法,在某一区域范围内,根据x计算y,然后用

PSet (x,y)实现曲线的绘制。


网站名称:vb.net数据库曲线 vb怎么根据数据绘制曲线
文章来源:http://bjjierui.cn/article/dospjjo.html

其他资讯