如何在vb中繪制多條曲線
網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)!專注于網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、微信小程序、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了沿灘免費(fèi)建站歡迎大家使用!
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
如何在origin中繪制多條曲線
把每條曲線的資料輸入book工作表中,A、 B列,C、D列和E、F列分別為三條不同曲線的資料。選中C列,然后右擊,選set as下屬的X,就成功將C列設(shè)為第二條曲線的X軸,類似的把第三條曲線的資料進(jìn)行相同的處理,這樣當(dāng)每條曲線的X軸資料不一樣時(shí)也不會(huì)影響作圖。選中所有資料,點(diǎn)選左下方線條右邊的小三角形,在出現(xiàn)的選項(xiàng)中選擇line,這樣就成功畫(huà)出了三條不同資料的曲線。雙擊橫座標(biāo)或者縱座標(biāo),出現(xiàn)一個(gè)對(duì)話方塊,選擇scale可以對(duì)橫軸座標(biāo)的范圍以及資料間距進(jìn)行設(shè)定,選擇Title and Format可以對(duì)圖形四個(gè)軸以及刻度進(jìn)行設(shè)定。最后,可以點(diǎn)選左上角File,選擇Export Graphs,在跳出的視窗中選擇儲(chǔ)存位置。
怎么在origin中畫(huà)多條曲線
將不同的資料分別設(shè)為的X和Y即可(即X1,Y1,X2,Y2……)。 具體步驟如下: 選中第一個(gè)橫座標(biāo)那列數(shù),右鍵單擊——選擇set as——選擇X,此時(shí)這列資料便會(huì)被設(shè)為X1。選中第一個(gè)縱座標(biāo),右鍵單擊——選擇set as——選擇Y,此時(shí)這列資料便會(huì)被設(shè)為Y1。
如何在origin中繪制區(qū)分多條曲線
origin繪制多條曲線,如果不同的Y值對(duì)應(yīng)的X值相同的即只有一欄X值,那么只要選中所有的資料,點(diǎn)選選擇origin下面的工具欄中的圖形型別即可作圖。
如果不同的Y值對(duì)應(yīng)的X值不同,即有不同的X值欄,這樣只有選中不同X資料欄,右鍵選擇set as:選擇X,即可設(shè)定不同的X1,X2,X3……,接著同樣選擇set as:Y,設(shè)定不同的Y1,Y2,Y3……,然后選擇所有的資料作圖即可。
做出的圖的圖列會(huì)自動(dòng)以曲線顏 *** 分多條曲線。
望采納,謝謝!
如何在origin中繪制多條不同座標(biāo)的曲線
將不同的資料分別設(shè)為的X和Y即可(即X1,Y1,X2,Y2……)。
具體步驟如下:
選中第一個(gè)橫座標(biāo)那列數(shù),右鍵單擊——選擇set as——選擇X,此時(shí)這列資料便會(huì)被設(shè)為X1。選中第一個(gè)縱座標(biāo),右鍵單擊——選擇set as——選擇Y,此時(shí)這列資料便會(huì)被設(shè)為Y1。
選中第二個(gè)橫座標(biāo)那列數(shù),同樣操作,此時(shí)這列資料便會(huì)被設(shè)為X2。以此類推。
最后將資料全選后作圖,就會(huì)發(fā)現(xiàn)不同橫縱座標(biāo)的資料被做在一張圖上了。
望采納,謝謝
如何在matlab同一個(gè)圖形上繪制多條曲線
利用hold on命名即可實(shí)現(xiàn)在同一圖形中繪制多條曲線或利用繪圖命令一次繪制多條曲線。
hold on就是將figure中的圖形儲(chǔ)存,之后再通過(guò)繪圖命令繪制下一條曲線,使多條曲線同時(shí)顯示在一個(gè)圖形之中。
具體實(shí)現(xiàn)方法可以參考如下程式段:
1
2
3
4
5
6
7
t = -5 : 0.01 : 5;
x = sin(t);
y = cos(t);
plot(t, x); 繪制正弦曲線
hold on; 將正弦曲線保持在圖形中
plot(t, y); 繪制余弦曲線,完成后圖形中就會(huì)同時(shí)顯示正弦曲線和余弦曲線
plot(t,x, t,y); 同時(shí)繪制正弦曲線和余弦曲線,該方法也是在圖形中同時(shí)顯示正弦曲線和余弦曲線
如何在excel中繪制曲線
開(kāi)啟excel--檢視--工具欄--繪圖--下面的自選圖形--曲線--根據(jù)需要自行調(diào)整
excel是日常辦公必不可少的工具之一,其有很強(qiáng)大的功能。今天給大家分享一下怎樣使用excel繪制曲線圖。這個(gè)功能能夠根據(jù)資料繪制出不同型別的圖,如果對(duì)曲線圖要求不高可以用excel代替matlab來(lái)畫(huà)資料分析曲線圖。(注意曲線是對(duì)比用的)
選中資料區(qū)域--“插入”選單--“圖表”--“圖表型別”中選擇“XY散點(diǎn)圖”--“子圖表型別”中選擇“無(wú)資料點(diǎn)平滑線散點(diǎn)圖”--點(diǎn)選“完成”
您也可以向我們團(tuán)隊(duì)發(fā)出請(qǐng)求,會(huì)有更專業(yè)的人來(lái)為您解答!
您好,您是想問(wèn)vb.net連續(xù)繪制曲線圖不消失怎么辦?b.net連續(xù)繪制曲線圖不消失的解決辦法如下:
1、首先必須創(chuàng)建bitmap,關(guān)聯(lián)到picturebox1.image上。
2、再在picturebox1.image上創(chuàng)建Graphics,再進(jìn)行作圖。即可顯示線圖。
在VB中繪制實(shí)時(shí)曲線是比較難的,一般要應(yīng)用第三方控件或是Windows
API函數(shù)來(lái)完成,但是如果你對(duì)實(shí)時(shí)曲線的要求不是很高,只要能表示出當(dāng)前的一般情況的話,我們可以直接應(yīng)用VB提供給我們的空間來(lái)完成.
原則上講,直接在Form里繪制曲線都是可以的,MSDN上面很多例程就是直接在Form里面繪制圖形的,Form作為繪制圖形的容器,不過(guò)一般應(yīng)用中Form中不可避免的會(huì)有很多其他控件,所以我們選擇PictureBox作為繪制曲線的容器.
實(shí)時(shí)曲線的繪制一般借助于Timer控件來(lái)完成,使用Timer控件,定期將串口或是其他儀器中監(jiān)測(cè)到的數(shù)據(jù)送往PictureBox1,而曲線的繪制一般畫(huà)成折線圖,采用PictureBox1的Line方法繪制.具體實(shí)現(xiàn)如下:
1.選擇需要顯示的窗體Picture1,加入圖片框Picture1,根據(jù)實(shí)際需要設(shè)置圖片的大小并移到合適的位置,并在圖片的外面畫(huà)好量程----時(shí)間坐標(biāo)系;然后加上Timer控件以及兩個(gè)CommandButton,界面就基本設(shè)置好了.
2.建立坐標(biāo)系,根據(jù)Picture1的大小和高度設(shè)置畫(huà)出坐標(biāo)系的X軸和Y軸:
Picture1
.ScaleMode
=
1
‘以VB的基本單位作為建立坐標(biāo)軸以及繪制圖形的單位;
Picture1.Refresh
Picture1.CurrentX
=
Picture1.ScaleLeft
+100
Picture1.CurrentY
=
Picture1.ScaleTop
Picture1.Print
Picture1.ScaleHeight
-
100
Picture1.Line(Picture1.ScaleLeft+100,Picture1.ScaleTop+100)-(Picture1.ScaleLeft+100,
Picture1.ScaleHeight
-
100)
Picture1.CurrentX
=
Picture1.ScaleLeft
+100
Picture1.CurrentY
=
Picture1.ScaleHeight
Picture1.Print
“(0,0)”
Picture1.Line
(Picture1.ScaleLeft
+
100,
Picture1.ScaleHeight
-
100)-(Picture1.ScaleWidth
-
100,
Picture1.ScaleHeight
-
100)
Picture1.CurrentX
=
Picture1.ScaleWidth
Picture1.CurrentY
=
Picture1.ScaleHeight
Picture1.Print
Picture1.ScaleWidth-100
Picture1.AutoRedraw
=
True
‘必要時(shí),用存儲(chǔ)在內(nèi)存中的圖象進(jìn)行重繪
3.繪制曲線并保存,我們這里以正弦曲線作為繪制曲線的數(shù)據(jù)來(lái)源,具體應(yīng)用是可以采用由串口或其他儀器采集得到的數(shù)據(jù).首先我們繪制一條中線,然后在Timer控件的Time事件中繪制曲線:
Picture1.Line
(Picture1.ScaleLeft,
CInt(Picture1.ScaleHeight
/
2))-(Picture1.ScaleWidth,
CInt(Picture1.ScaleHeight
/
2))
‘繪制中線
Private
Sub
Timer1_Timer()
Dim
y1
As
Integer
y1
=
CInt(Sin((x
-
Picture1.Left)
/
20
/
180
*
pi)
*
Picture1.ScaleHeight
/
2)
y1
=
CInt((Picture1.ScaleHeight
+
1000)
/
2)
-
y1
Picture1.Line
(x,
y)-(x
+
20,
y1)
x
=
x
+
20
y
=
y1
If
x
=
Picture1.ScaleWidth
Then
SavePicture
Picture1.Image,
"c:\sin.bmp"
‘保存圖畫(huà),
。net ?其實(shí)還是很好繪制圖形的
你可以看下?Graphics ?類
Dim d As New Bitmap(Me.Width, Me.Height) ?‘一個(gè)圖片吧
? Dim g As Graphics = Graphics.FromImage(d)’繪制 ?準(zhǔn)備在這個(gè)圖片是進(jìn)行
然后 ?就是你繪制的東西了
線 就是 ??g.DrawLine()
圓 弧度 ?就用 ?g.DrawArc(Pens.Black, New Rectangle(0, 0, 400, 200), 0, 360)
復(fù)雜的就是 ? ? ?g.DrawBezier()
等 ?如果你用的是 VS的 ?編譯 ?上面都有詳細(xì)的參數(shù)說(shuō)明
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