PAGEword文檔可自由復制編輯word文檔可自由復制編輯大學課程設計課程課程石油工程課程設計題目瑞利(Rayleigh)模型的應用院系石油工程學院專業班級學生姓名學生學號指導教師王立軍201PAGEword文檔可自由復制編輯word文檔可自由復制編輯東北石油大學課程設計任務書課程石油工程課程設計題目瑞利(Rayleigh)模型的應用專業\姓名\學號主要內容、基本要求、主要參考資料等主要內容：推導瑞利預測模型；根據油氣田實際生產數據，進行線性回歸，求得直線的截距和斜率；根據相關公式，確定瑞利模型常數a和c；計算油田年產油量；計算油田累積產油量；計算可采儲量；計算最高年產量發生的時間；計算最高年產量；計算油田達到最高產量時的累積產量；繪制油田實際年產量與預測產量對比曲線；繪制油田實際累積產量與預測累積產量對比曲線。基本要求：基礎數據:某油田或區塊的開發數據。設計要求該專題設計最終要求是，學生通過自選上述基礎數據，利用所學知識完成規定設計內容，編制相應軟件，并提交規范設計報告。主要參考資料陳元千油藏工程實踐[M].石油工業出版社.完成期限2014年7月1日～2014年7月18日指導教師王立軍專業負責人王立軍2014年7月18日目錄TOC\o"1-2"\h\z\u1前言 11.1設計的目的意義 11.2設計的主要內容 12基礎數據 23基礎理論 33.1瑞利(Rayleigh)模型的應用模型的建立 33.2模型的求解方法 54設計結果 7認識與結論 10參考文獻 11附錄 121前言1.1設計的目的意義本課題的目的是讓學生通過自選一組數據，利用所學專業知識在指導教師的指導下獨立完成對某一油田或區塊開發指標的預測。本課題要求學生對瑞利(Rayleigh)模型的關系式進行推導，其結果包括，對油氣田的年產量、累積產量、可采儲量、最高年產量、最高年產量發生的時間的預測方法。從而將理論知識和實際問題相結合，通過該專題設計的訓練，加強學生理論知識運用能力，計算機技術應用能力及解決實際問題的工程應用能力。1.2設計的主要內容根據已有的基礎數據，利用所學的專業知識，在指導教師指導下獨立完成并提交一個油田或一個區塊油田開發指標預測結果，設計主要內容如下：推導瑞利預測模型；根據油氣田實際生產數據，進行線性回歸，求得直線的截距和斜率；根據相關公式，確定瑞利模型常數a和c；計算油田年產油量；計算油田累積產油量；計算可采儲量；計算最高年產量發生的時間；計算最高年產量；計算油田達到最高產量時的累積產量；繪制油田實際年產量與預測產量對比曲線；繪制油田實際累積產量與預測累積產量對比曲線。2基礎數據中國華北地區的任丘霧迷山古潛山油田于1975年7月被發現，1976年投產。其油藏類型為塊狀底水潛山，孔、洞、縫發育，儲層位于震旦系，以白云巖為主。油藏埋藏深度為2588~3510m，含油面積為56.9km2，油層有效厚度為272.0m.，有效孔隙度為6%，空氣滲透率為106×10-3μm2。原始地層壓力為32.6MPa，原始飽和壓力為1.3MPa，原始氣油比為4.4m3/t，地面原油密度為0.889g/cm3，地層油粘度為8.20mPa·s。開始上報的原油地質儲量為53038×104t，可采儲量為11760×104t。油藏采用邊緣底部的注水方式。1990年底綜合含水率為82%。該油田的開發數據列于下表。表2-1開發數據表年份開發時間(a)年產量(104t/a)累積產量(104t/a)1975112.2012.2019762606.10618.30197731127.301745.60197841191.502937.10197951240.204177.30198061235.205412.5019817977.956390.4519828901.827292.2719839807.628099.89198410739.388839.27198511675.399514.66198612581.9410096.60198713352.4510449.05198814209.9210658.97198915153.6210812.59199016120.2410932.833基礎理論瑞利(Rayleigh)模型能夠很好地預測對油氣田的年產量、累積產量、可采儲量、最高年產量、最高年產量發生的時間，以及最高年產量對應的累計產量。3.1瑞利(Rayleigh)模型的應用模型的建立在數理統計中瑞利分布的分布密度表示為：(3-1)式中f(x)——瑞利分布的分布密度函數；x——分布變量，其值大于等于0；μ——控制分布峰值的參數。由式(3-l)表示的瑞利分布，在x從0到∞區間內的累積分布（或分布函數）等于1，因此可以得到關系式如下（3-2）對于油氣田來說，開發時間從0到∞之間的累計產量可視為油氣田的可采儲量，可表示為(3-3)式中：NR為油氣田的可采儲量，104t（油），108m3（氣）；NP（t）為累積產量，104t（油），108m3（氣）；Q年產量，104t/a（油），108m3/a（氣）；t為開發時間，a。將式（3-3）等號兩端同除以NR得（3-4）由式（3-2）與式（3-4）對比可以看出，，因此，若將式（3-1）轉換為預測油氣田產量分布的模型時，需將該式的右端乘以可采儲量。該可采儲量可視為，將數理統計中的理論分布轉為預測模型的轉換常數。由此，式（3-1）可寫為（3-5）設，則；又設和得（3-6）再作如下設定（3-7）則得到預測油氣田產量的模型為（3-8）油氣田的累積產量表示為（3-9）將式（3-8）代入式（3-9）進行積分得（3-10）再講式（3-7）代入式（3-10），得到預測油氣田累積產量的模型為（3-11）對式（3-8）兩邊取導數，整理得（3-12）當時，必然有（3-13）由式（3-13）可以得到最高年產量發生的時間為（3-14）式中：為最高年產量發生的時間，a將式（3-14）代入式（3-8）的得到預測油氣田最高年產量的公式為（3-15）式中：為最高年產量，104t/a（油），108m3/a（氣）。再將式（3-14）代入式（3-11）得到預測最高年產量對應的累積產量為（3-16）式中：為最高年產量對應的累積產量，104t/a（油），108m3/a（氣）。將式（3-7）代入式（3-16）得（3-17）已知，因此式（3-17）又可寫為（3-18）由式（3-18）可以看出，對于瑞利模型來說，當可采儲量的40%時，油田進入遞減期。3.2模型的求解方法由上述推導的結果可以看出，要想利用瑞利模型進行各項預測，就必須首先確定模型常數a和c的數值。為此，將式（3-18）等號兩端先除以t再取常用對數，得（3-19）若設：（3-20）（3-21）則得：（3-22）由式（3-22）看出，Q/t與之間具有半對數直線關系。當根據油氣田的實際生產數據，由式（3-22）進行線性回歸之后，可以求得直線的截距和斜率的數值，并由式（3-22）和式（21）確定模型常數a和c的數值。最小二乘法原理：最小二乘法是提供“觀測組合”的主要工具之一,它依據對某事件的大量觀測而獲得最佳結果或最可能表現形式。如已知2變量為線性關系y=ax+b對其進行n(n>2)次觀測而獲得n對數據,若將這n對數據代入方程求解a,b之值則無確定解。最小二乘法提供了一個求解方法,其基本思想就是尋找最接近這n個觀測點的直線。這條直線上各點相應的y值與測量值對應縱坐標值之偏差的平方和在所擬合中應是最小的。在相同試驗測量條件下,測得自變量的值為x1,x2,x3,xn,對應的物理量依次為y1,y2,y3,yn值。用這一組數據,根據最小二乘法原理去求直線的經驗方程,也就是要總的偏差的平方和為最小,根據統計理論,有:如果試驗是在已知線性函數關系下進行的,那么用上述最小二乘法進行線性擬合,可得到最佳直線及其截距b和斜率a,從而得到回歸方程。如果試驗是要通過x、y的測量來尋找經驗公式,則還應判別由上述線性擬合所得的線性方程是否恰當。這可由x、y的相關系數來判別:相關系數大小表示了相關程度好壞。的值在0和1之間,的絕對值越接近1,說明線性越好。4設計結果處理表1中的數據得到和相應的，按照（3-22）式的直線關系繪于圖4-1，得到了一條很好的直線。經線性回歸求得直線的截距α=2.5816；直線的斜率β=0.007528；直線的相關系數r=0.9945。將α和β的數值分別代入式（3-20）和式（3-21）求得a為387.59，c為57.76。圖4-1該油田與的半對數關系將a和c的數值代入式（3-7）得到該油田的可采儲量為11020×104t；將c的值代入式（3-14）得到最高年產量發生的時間為5.3692a；將a和c的數值代入式（3-15）得到該油田的最高年產量為1242.8×104t；將該油田可采儲量的數值代入式（3-18）得到該當油田年產量達到最高年產量時的累積產量為4401.14×104t。將a和c的數值代入式（3-8）得，預測該油田年產量的公式為（3-23）將a和c的數值代入式（3-10）得到預測該油田累積產量的公式為（3-24）由式（3-23）和式（3-24）預測該油田的產量和累積產量如表4-1表4-1開發數據表年份開發時間(a)預測年產量(104t/a)預測累積產量(104t/a)19751352.6832177.712919762673.3874694.654619773934.91751504.67197841118.6542538.444197951216.6253713.276198061231.564943.923198171175.1326152.55198281064.9517276.2519839921.08638271.242198410762.85629113.677198511606.43899797.615198612463.547410331.12198713341.14710731.59198814241.979411021.2198915165.56211223.16199016109.33911359.07根據表4-1中數據，在同一坐標系中繪制實際產量與預測產量及其對應時間t之間的關系曲線，繪于圖4-2。圖4-2實際與預測產量隨時間變化曲線在同一坐標系中繪制實際累計產量與預測累計產量及其對應時間t之間的關系曲線，繪于圖4-3。圖4-3實際與預測累計產量隨時間變化曲線認識與結論通過本次課程設計，得出如下認識與結論：（1）完成了這次課程設計使我掌握了瑞利(Rayleigh)模型的應用，并能初步對油田進行預測分析。（2）我能熟練掌握并應用瑞利(Rayleigh)模型原理、推導及公式，可以對油氣田的年產量、累計產量、可采儲量、最高年產量、最高年產量發生的時間以及與最高年產量對應的累積產量進行預測。（3）在三周的課程設計里，我對VB語言有了更深刻的理解。同時，提高了我對實際問題的解決能力，使理論與實踐相結合。（4）在這次課程設計之后，使我認識到學好計算機的重要性與實踐操作的必要性，在老師的指導下和與同學的討論中，不斷地發現問題、不斷地解決問題、不斷地領悟、不斷地獲取，使自己的程序不斷完善。（5）通過這次的課程設計，培養了我獨立思考和動手操作的能力，也使我在日常的學習與討論當中增長了許多課外知識，認識到數學模型對油氣田的產量預測的重要性。雖然在課程設計的過程中遇到了一些問題，但經過反復的思考與檢查找出原因所在并進行改正。參考文獻[1]陳元千.瑞利模型的完善推導與應用[J].油氣地質與采收率，2004，11（4）：39-41.[2]陳元千油藏工程實踐[M].石油工業出版社,2003[3]蘭燕娜基于VB語言實現最小二乘法直線擬合.長江大學學報2011附錄程序Dimnf(17)AsSingle,kfsj(17)AsSingle,cl(17)AsSingle,ljcl(17)AsSinglePrivateSubbc_Click()CD1.ShowSaveIfCD1.FileName=""ThenExitSubOpen"E:\基礎數據.txt"ForOutputAs#1Fori=1ToMSFlexGrid1.Rows-1Print#1,MSFlexGrid1.TextMatrix(i,0),MSFlexGrid1.TextMatrix(i,1),MSFlexGrid1.TextMatrix(i,2),MSFlexGrid1.TextMatrix(i,3)NextiClose#1EndSubPrivateSubCommand1_Click()Label1.Visible=TrueMSFlexGrid1.Visible=TrueOpen"E:\基礎數據.txt"ForInputAs#1i=1k=MSFlexGrid1.RowsWhileNotEOF(1)Input#1,nf(i),kfsj(i),cl(i),ljcl(i)MSFlexGrid1.TextMatrix(i,0)=nf(i)MSFlexGrid1.TextMatrix(i,1)=kfsj(i)MSFlexGrid1.TextMatrix(i,2)=cl(i)MSFlexGrid1.TextMatrix(i,3)=ljcl(i)i=i+1Ifi>MSFlexGrid1.Rows-1ThenMSFlexGrid1.Rows=i+1WendIfk<>MSFlexGrid1.RowsThenMSFlexGrid1.Rows=MSFlexGrid1.Rows-1EndSubPrivateSubCommand2_Click()Label1.Visible=TrueLabel2.Visible=TrueLabel3.Visible=TrueLabel4.Visible=TrueText1.Visible=TrueText2.Visible=TrueText3.Visible=TrueMSFlexGrid1.Visible=TrueMSFlexGrid1.Cols=MSFlexGrid1.Cols+2MSFlexGrid1.ColWidth(5)=1000MSFlexGrid1.TextMatrix(0,4)="t^2"MSFlexGrid1.TextMatrix(0,5)="lg（Q/t）"i=1k=MSFlexGrid1.RowsFori=1ToMSFlexGrid1.Rows-1MSFlexGrid1.TextMatrix(i,4)=kfsj(i)^2MSFlexGrid1.TextMatrix(i,5)=Int(Log(cl(i)/kfsj(i))/2.303*1000)/1000Ifi>MSFlexGrid1.Rows-1ThenMSFlexGrid1.Rows=i+1NextiIfk<>MSFlexGrid1.RowsThenMSFlexGrid1.Rows=MSFlexGrid1.Rows-1Fori=2ToMSFlexGrid1.Rows-1X=X+kfsj(i)^2Z=Z+Int(Log(cl(i)/kfsj(i))/2.303*1000)/1000zx=zx+Int(Log(cl(i)/kfsj(i))/2.303*1000)/1000*kfsj(i)^2xx=xx+(kfsj(i)^2)^2NextiText1=Int(((MSFlexGrid1.Rows-2)*zx-Z*X)/(((MSFlexGrid1.Rows-2)*xx-X^2))*10000)/10000Text2=Int((Z-Text1*X)/(MSFlexGrid1.Rows-2)*10000)/10000Text3.Text="lg(Q/t)="&Text1&"t^2"&"+"&Text2EndSubPrivateSubForm_Load()Label1.Visible=FalseLabel2.Visible=FalseLabel3.Visible=FalseLabel4.Visible=FalseText1.Visible=FalseText2.Visible=FalseText3.Visible=FalseMSFlexGrid1.Visible=FalseMSFlexGrid1.TextMatrix(0,0)="年份"MSFlexGrid1.TextMatrix(0,1)="開發時間(a)"MSFlexGrid1.TextMatrix(0,2)="年產量(10^4t/a)"MSFlexGrid1.TextMatrix(0,3)="累積產量(10^4t/a)"MSFlexGrid1.ColWidth(1)=1500MSFlexGrid1.ColWidth(2)=2000MSFlexGrid1.ColWidth(3)=2000EndSubPrivateSubjs_Click()Form1.HideForm2.ShowReDimj(1To17)AsStringReDimh(1To17)AsStringReDiml(1To17)AsStringForm2.MSFlexGrid1.TextMatrix(0,0)="開發時間(a)"Form2.MSFlexGrid1.TextMatrix(0,1)="理論年產油量(10^4t/a)"Form2.MSFlexGrid1.TextMatrix(0,2)="理論累積產油量(10^4t/a)"Form2.MSFlexGrid1.ColWidth(0)=1000Form2.MSFlexGrid1.ColWidth(1)=2000Form2.MSFlexGrid1.ColWidth(2)=2800g=0Fori=1ToMSFlexGrid1.Rows-1l(i)=Form1.Text1*kfsj(i)^2+Form1.Text2h(i)=kfsj(i)*10^l(i)g=g+h(i)j(i)=gForm2.MSFlexGrid1.TextMatrix(i,0)=kfsj(i)Form2.MSFlexGrid1.TextMatrix(i,1)=Int(h(i)*10000)/10000Form2.MSFlexGrid1.TextMatrix(i,2)=Int(j(i)*10000)/10000Nextic=1/(-Form1.Text1.Text)/2.3a=10^(Form1.Text2.Text)Form2.Text1.Text=Int(0.5*a*c*10000)/10000Form2.Text2.Text=Int(0.707*(c^0.5*10000))/10000Form2.Text3.Text=Int(0.4289*a*c^0.5*10000)/10000Form2.Text4.Text=Int(0.5*a*c*(1-10^(-0.5)/0.52137)*10000)/10000EndSubPrivateSubone_Click()Form1.HideForm2.HideForm3.ShowForm3.MSChart1.Visible=TrueForm3.MSChart2.Visible=FalseForm3.MSChart3.Visible=Falsen=MSFlexGrid1.Rows-1ReDime(1Ton,1Ton)AsStringReDimf(1Ton,1Ton)AsStringFori=1ToMSFlexGrid1.Rows-1e(i,2)=Int(Log(cl(i)/kfsj(i))/2.303*1000)/1000e(i,1)=kfsj(i)^2NextiForm3.Text1.Text="lg(Q/t)="&Form1.Text1.Text&"t^2"&"+"&(Form1.Text2.Text)ReDimMyData(n-1,3)AsDouble'x軸坐標值Y軸坐標值Fori=1ToMSFlexGrid1.Rows-1MyData(i-1,0)=e(i,1):MyData(i-1,1)=e(i,2)'本句代表了：第一點數據的X軸坐標,Y軸坐標MyData(i-1,3)=(Form1.Text1.Text)*e(i,1)+Form1.Text2.TextMyData(i-1,2)=e(i,1)Nexti'波形圖外觀設置WithForm3.MSChart1.Plot.SeriesCollection(1).Pen.Width=30.Plot.SeriesCollection(1).Pen.Style=VtPenStyleSolid'設置XY軸.Plot.Axis(VtChAxisIdX).ValueScale.Auto=False.Plot.Axis(VtChAxisIdY).ValueScale.Auto=False'//設置最大值.Plot.Axis(VtChAxisIdX).ValueScale.Maximum=300.Plot.Axis(VtChAxisIdY).ValueScale.Maximum=3'//設置最小值.Plot.Axis(VtChAxisIdY).ValueScale.Minimum=0.Plot.Axis(VtChAxisIdX).ValueScale.Minimum=0'//.Plot.Axis(VtChAxisIdX).ValueScale.MajorDivision=20'X軸主要網格數量.Plot.Axis(VtChAxisIdY).ValueScale.MajorDivision=20'Y軸主要網格數量.Plot.Axis(VtChAxisIdX).ValueScale.MinorDivision=0'X軸次要網格數量.Plot.Axis(VtChAxisIdY).ValueScale.MinorDivision=0'Y軸次要網格數量.Plot.Axis(VtChAxisIdX).AxisGrid.MajorPen.Style=VtPenStyleDotted.Plot.Axis(VtChAxisIdY).AxisGrid.MajorPen.Style=VtPenStyleDottedForm3.MSChart1.Plot.AutoLayout=FalseForm3.MSChart1.Plot.UniformAxis=FalseForm3.MSChart1.chartType=VtChChartType2dXY'設置圖形為二維散點圖Form3.MSChart1.ChartData=MyData'數據.Plot.Axis(VtChAxisIdX,0).AxisTitle="t^2".Plot.Axis(VtChAxisIdY,0).AxisTitle="Lg(Q/t)"DimIndexAsIntegerIndex=1'設置圖標類型為非自動選擇，這樣可以設置為自己需要的類型Form3.MSChart1.Plot.SeriesCollection(Index).ShowLine=False'去除連線Form3.MSChart1.Plot.SeriesCollection.Item(Index).SeriesMarker.Auto=FalseWithForm3.MSChart1.Plot.SeriesCollection.Item(Index).DataPoints.Item(-1).Marker.Visible=True'散點的點是否可見.Size=50'散點的大小.Style=VtMarkerStyleFilledDiamond'選擇菱形的.FillColor.Automatic=False'顏色不自動填充.FillColor.Set400,40,400'設置為黑色.Pen.VtColor.Set255,40,400'同樣這個也必須設置，否則中間有默認的顏色EndWithEndWithEndSubPrivateSubsjsr_Click()MSFlexGrid1.Visible=TrueLabel1.Visible=TrueEndSubPrivateSubMSFlexGrid1_KeyPress(KeyAsciiAsInteger)r=MSFlexGrid1.Rowc=MSFlexGrid1.Coll=Len(MSFlexGrid1.TextMatrix(r,c))IfKeyAscii=8ThenIfl>1ThenMSFlexGrid1.TextMatrix(r,c)=Left(MSFlexGrid1.TextMatrix(r,c),l-1)Ifl=1ThenMSFlexGrid1.TextMatrix(r,c)=""ElseMSFlexGrid1.TextMatrix(r,c)=MSFlexGrid1.TextMatrix(r,c)+Chr(KeyAscii)EndIfEndSubPrivateSubthree_Click()Form1.HideForm2.HideForm3.ShowForm3.Text1.Visible=FalseForm3.MSChart3.Visible=TrueForm3.MSChart1.Visible=FalseForm3.MSChart2.Visible=FalseReDimj(1To17)AsStringReDimh(1To17)AsStringReDiml(1To17)AsStringa=0Fori=1ToMSFlexGrid1.Rows-1l(i)=Form1.Text1*kfsj(i)^2+Form1.Text2h(i)=kfsj(i)*10^l(i)a=a+h(i)j(i)=aNextiReDimMyData(16,3)AsStringFori=1To16MyData(i,2)=kfsj(i):MyData(i,3)=j(i)'本句代表了：第一點數據的X軸坐標，Y軸坐標NextiFori=1To16MyData(i,0)=kfsj(i):MyData(i,1)=ljcl(i)Nexti'波形圖外觀設置WithForm3.MSChart3''設置圖線的外觀.Plot.SeriesCollection(1).Pen.Width=30.Plot.SeriesCollection(1).Pen.Style=VtPenStyleSolid''設置XY軸.Plot.Axis(VtChAxisIdX).ValueScale.Auto=False.Plot.Axis(VtChAxisIdY).ValueScale.Auto=False'//設置最大值.Plot.Axis(VtChAxisIdX).ValueScale.Maximum=18.Plot.Axis(VtChAxisIdY).ValueScale.Maximum=12000'//設置最小值.Plot.Axis(VtChAxisIdY).ValueScale.Minimum=0.Plot.Axis(VtChAxisIdX).ValueScale.Minimum=0'//.Plot.Axis(VtChAxisIdX).ValueScale.MajorDivision=12'X軸主要網格數量.Plot.Axis(VtChAxisIdY).ValueScale.MajorDivision=10'Y軸主要網格數量.Plot.Axis(VtChAxisIdX).ValueScale.MinorDivision=0'X軸次要網格數量.Plot.Axis(VtChAxisIdY).ValueScale.MinorDivision=0'Y軸次要網格數量.Plot.Axis(VtChAxisIdX).AxisGrid.MajorPen.Style=VtPenStyleDotted.Plot.Axis(VtChAxisIdY).AxisGrid.MajorPen.Style=VtPenStyleDottedForm3.MSChart3.Plot.AutoLayout=FalseForm3.MSChart3.Plot.UniformAxis=FalseForm3.MSChart3.chartType=VtChChartType2dXY'設置圖形為二維散點圖Form3.MSChart3.ChartData=MyData'數據DimIndexAsIntegerIndex=1'設置圖標類型為非自動選擇，這樣可以設置為自己需要的類型Form3.MSChart3.Plot.SeriesCollection(Index).ShowLine=False'去除連線Form3.MSChart3.Plot.SeriesCollection.Item(Index).SeriesMarker.Auto=FalseWithForm3.MSChart3.Plot.SeriesCollection.Item(Index).DataPoints.Item(-1).Marker.Visible=True'散點的點是否可見.Size=80'散點的大小.Style=VtMarkerStyleFilledDiamond'選擇菱形的.FillColor.Automatic=False'顏色不自動填充.FillColor.Set400,40,400'設置為黑色.Pen.VtColor.Set55,40,400'同樣這個也必須設置，否則中間有默認的顏色EndWithEndWithEndSubPrivateSubtwo_Click()Form1.HideForm2.HideForm3.ShowForm3.Text1.Visible=FalseForm3.MSChart2.Visible=TrueForm3.MSChart1.Visible=FalseForm3.MSChart3.Visible=FalseReDimh(1To17)AsStringReDiml(1To17)AsStringFori=1ToMSFlexGrid1.Rows-1l(i)=Form1.Text1*kfsj(i)^2+Form1.Text2h(i)=kfsj(i)*10^l(i)NextiReDimMyData(16,3)AsString'x軸坐標值Y軸坐標值Fori=1To16MyData(i,2)=kfsj(i):MyData(i,3)=h(i)'本句代表了：第一點數據的X軸坐標，Y軸坐標NextiFori=1To16MyData(i,0)=kfsj(i):MyData(i,1)=cl(i)Nexti'波形圖外觀設置WithForm3.MSChart2.Plot.SeriesCollection(1).Pen.Width=30.Plot.SeriesCollection(1).Pen.Style=VtPenStyleSolid''設置XY軸.Plot.Axis(VtChAxisIdX).ValueScale.Auto=False.Plot.Axis(VtChAxisIdY).ValueScale.Auto=False'//設置最大值.Plot.Axis(VtChAxis