vb.net動態曲線,C#實時曲線

vb.net實現實時數據采集曲線,有什么方法,或是書籍呢?

簡單說下思路吧,具體的代碼可以查資料

成都一家集口碑和實力的網站建設服務商,擁有專業的企業建站團隊和靠譜的建站技術,十余年企業及個人網站建設經驗 ,為成都超過千家客戶提供網頁設計制作,網站開發,企業網站制作建設等服務,包括成都營銷型網站建設,高端網站設計,同時也為不同行業的客戶提供成都網站設計、成都做網站的服務,包括成都電商型網站制作建設,裝修行業網站制作建設,傳統機械行業網站建設,傳統農業行業網站制作建設。在成都做網站,選網站制作建設服務商就選創新互聯公司。

首先要會畫曲線圖,有三種方法:

1、用mschar控件(vb6的);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 繪制實時溫度曲線

這個要用GDI+畫。要看你.net版本。

以下是VS2005中的一段代碼。

Me.PictureBox1.Height = 450

Me.PictureBox1.Width = 880

Dim gr As Graphics '定義畫布

Dim bp As New Bitmap(880, 450) '定義位圖,并進行賦值

Dim p As New Pen(Color.Black) '定義畫筆

p.Width = 2 '寬度2

p.DashStyle = Drawing2D.DashStyle.Solid '樣式直線

PictureBox1.Image = bp

gr = Graphics.FromImage(PictureBox1.Image)

gr.FillRectangle(Brushes.White, New Rectangle(0, 0, PictureBox1.Width, PictureBox1.Height))

gr.DrawLine(p, a, b, a, .Height - b) '繪制縱坐標

gr.DrawLine(p, a, .Height - b, .Width - a, .Height - b) '繪制橫坐標

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動態曲線,C#實時曲線
網頁地址:http://m.kartarina.com/article0/hsddio.html

成都網站建設公司_創新互聯,為您提供手機網站建設網站排名、網站收錄、面包屑導航、網站導航、

廣告

聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯

h5響應式網站建設
主站蜘蛛池模板: 无码人妻精品一区二区三区东京热| 亚洲Av无码乱码在线观看性色| 无码日韩精品一区二区人妻| 国产免费黄色无码视频| 日韩人妻无码一区二区三区综合部| 韩日美无码精品无码| 亚洲aⅴ无码专区在线观看春色 | 色欲A∨无码蜜臀AV免费播| 无码精品久久久天天影视 | 精品久久久久久无码人妻| 成人免费无码H在线观看不卡| 中文字幕av无码不卡免费| 中文无码热在线视频| 亚洲日韩av无码中文| 无码精品一区二区三区在线 | 久久国产精品成人无码网站| 中文字幕av无码一区二区三区电影 | 91精品久久久久久无码| 国产丰满乱子伦无码专区| 免费无码婬片aaa直播表情| 黄色成人网站免费无码av| mm1313亚洲国产精品无码试看| 婷婷四虎东京热无码群交双飞视频| 精品久久久久久无码专区 | 伊人久久精品无码麻豆一区 | 国产成人精品无码播放| 国精品无码一区二区三区左线| 欧洲精品无码一区二区三区在线播放| 久久中文精品无码中文字幕| 本免费AV无码专区一区| 日韩免费人妻AV无码专区蜜桃| 日韩精品无码专区免费播放| MM1313亚洲精品无码久久| 四虎影视无码永久免费| 日韩精品无码久久久久久| 免费无码一区二区三区蜜桃大| 国产麻豆天美果冻无码视频| 亚洲av中文无码字幕色不卡| 最新中文字幕AV无码不卡| 人妻av中文字幕无码专区| 亚洲AV永久无码精品|