锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net数据库曲线 vb实时数据曲线

IT技术数据库

想在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 ， 绘制图形的线条的颜色设置：
【vb.net数据库曲线 vb实时数据曲线】1）Object.ForeColor = QbColor(n):n = 0 -- 15
2) 或者在使用上述方法时，在后边跟的参数[color]
思路：
绘制曲线，就是根据函数关系：y = f(x)，采用描点法，在某一区域范围内，根据x计算y，然后用
PSet (x,y)实现曲线的绘制 。
vb.net+Access数据库，按时绘制一天的数据的曲线，即24小时趋势曲线1、2，有多少数据就画多少曲线，前或后没有就断开呗，前后都没有就画横线 。
3，数据库按时间排序，选出最新时间值，然后根据这个值
，通过类似 select * from table where date#2010-8-20# and date#2007-8-23# 这样的语句选出往前两天的数据 。
vb.net实现实时数据采集曲线，有什么方法，或是书籍呢？简单说下思路吧vb.net数据库曲线，具体vb.net数据库曲线的代码可以查资料
首先要会画曲线图vb.net数据库曲线，有三种方法vb.net数据库曲线：
1、用mschar控件（vb6的）vb.net数据库曲线；2、用水晶报表；3、用word图表
x轴为时间，y轴为数据
要实现实时数据刷新，只要用 定时器 定时刷新曲线图的数据就可以了（x、y的数据重写）
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.net绘制曲线图 。net其实还是很好绘制图形vb.net数据库曲线的
vb.net数据库曲线你可以看下 Graphics类
Dim d As New Bitmap(Me.Width, Me.Height)‘一个图片吧
Dim g As Graphics = Graphics.FromImage(d)’绘制准备在这个图片是进行
然后就是你绘制vb.net数据库曲线的东西vb.net数据库曲线了
线 就是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）vb.net数据库曲线， New Point(200, 200))
g.Dispose()
Me.BackgroundImage = d
关于vb.net数据库曲线和vb实时数据曲线的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

推荐阅读


上一篇：jquery怎么删除name，jquery怎么删除节点

下一篇：word图片复制不了怎么回事，word图片复制不了怎么回事儿