vb.net繪制曲線圖

。net ?其實還是很好繪制圖形的

羅源網(wǎng)站制作公司哪家好，找創(chuàng)新互聯(lián)！從網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、成都響應式網(wǎng)站建設(shè)公司等網(wǎng)站項目制作，到程序開發(fā)，運營維護。創(chuàng)新互聯(lián)成立于2013年到現(xiàn)在10年的時間，我們擁有了豐富的建站經(jīng)驗和運維經(jīng)驗，來保證我們的工作的順利進行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)。

你可以看下?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的 ?編譯 ?上面都有詳細的參數(shù)說明

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 實時曲線

拖一個PictureBox1控件 創(chuàng)建一個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 得到數(shù)據(jù)后，改point的數(shù)據(jù)。然后PictureBox1.Refresh()就行了

VB.net 高次曲線擬合并繪圖

構(gòu)造Pen的時候可以指定粗細，如果你指定為1，并且放大了10倍，最后就成10了，所以你指定小點就行了，比如 Dim p As New Pen(Color.Black, 0.01) 最終繪制的線的粗細不會小于1

請問在VB6中該如何畫多條曲線呢

Private?Sub?Form_Load()

MSChart1.chartType?=?VtChChartType2dLine

Dim?arrValues()

ReDim?arrValues(1?To?5,?1?To?6)

Dim?i?As?Integer

For?i?=?1?To?5

arrValues(i,?1)?=?"t"??i?'x軸

arrValues(i,?2)?=?0?+?Rnd?*?100?'第一條線

arrValues(i,?3)?=?0?+?Rnd?*?100?'第二條線

arrValues(i,?4)?=?0?+?Rnd?*?100?'第三條線

arrValues(i,?5)?=?0?+?Rnd?*?100?'第四條線

arrValues(i,?6)?=?0?+?Rnd?*?100?'第五條線

Next?i

MSChart1.ChartData?=?arrValues

vb.net連續(xù)繪制曲線圖不消失

您好，您是想問vb.net連續(xù)繪制曲線圖不消失怎么辦？b.net連續(xù)繪制曲線圖不消失的解決辦法如下：

1、首先必須創(chuàng)建bitmap,關(guān)聯(lián)到picturebox1.image上。

2、再在picturebox1.image上創(chuàng)建Graphics,再進行作圖。即可顯示線圖。

本文標題：vb.net兩條曲線,vb 曲線
文章URL：http://chinadenli.net/article26/dsgodcg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供品牌網(wǎng)站設(shè)計、網(wǎng)站制作、手機網(wǎng)站建設(shè)、響應式網(wǎng)站、靜態(tài)網(wǎng)站、標簽優(yōu)化

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)