Realiseringen af et linjegraf i Visual Basic.NET eller VB.NET , er ikke så kompliceret som du måske tror. Du kan bruge chart kontrol i VB til at skabe enkle , intuitive og visuelt overbevisende diagrammer for komplekse statistiske eller økonomiske analyser. Brug serien og Points egenskaber til at definere de data , du ønsker at vise på dit diagram. Den ChartType ejendom anvendes til at definere den type diagram , du vil bruge, såsom et kurvediagram . Ting du skal
Microsoft Visual Studio
Vis Flere Instruktioner
1
Launch Microsoft Visual Studio , klik på " Nyt projekt " fra venstre rude på din computerskærm , og expand " Visual Basic " nedenfor Installerede skabeloner . Klik på " Windows" og dobbeltklik på "Windows Forms Application " fra midten af dialogvinduet for at oprette et nyt projekt.
2
Højreklik på Værktøjskasse rude og klik på " Vælg elementer. " Klik på " . NET Framework Komponenter " fanen og tjek " Chart" boksen for at tilføje et nyt diagram kontrol til værktøjskassen. Dobbeltklik på " Chart" for at føje et nyt diagram kontrol til formularen . Dobbeltklik på " Button " for at tilføje en ny knap til formularen .
3
Højreklik på formularen , og klik på " View Code " for at starte VB kode modulet. Kopier og indsæt følgende kode til at definere chart egenskaber under formularen load begivenheden : Hej
Dim dtGraph Da New DataTable
Private Sub Form1_Load ( ByVal afsender Som System.Object , ByVal e Som System . EventArgs ) Håndtag MyBase.Load
dtGraph.Columns.Add ( " tidspunkterne " getType ( heltal) )
dtGraph.Columns.Add ( " Speed" , getType ( Integer )) < br >
dtGraph.Rows.Add ( 0, 0)
dtGraph.Rows.Add (1000 , 50)
dtGraph.Rows.Add (2000 , 50)
< p> dtGraph.Rows.Add (3000 , 0)
Chart1.ChartAreas (0)
. AxisX.Minimum = 0
. AxisX.Maximum = 3000 < br >
. AxisY.Minimum = 0
. AxisY.Maximum = 60
. AxisY.Interval = 10
. AxisX.Title = " Time" < br >
. AxisY.Title = "Hastighed "
End With
End Sub
4
Kopier og indsæt følgende kode til at gøre linjegrafen : Hej
Private Sub Button1_Click ( ByVal afsender Som System.Object , ByVal e Som System.EventArgs ) Handles Button1.Click
Chart1.Series (0)
Points . . databind ( dtGraph.DefaultView " tidspunkterne ", " Speed" , Nothing )
. ChartType = DataVisualization.Charting.SeriesChartType.Line
. BorderWidth = 4 fotos
End med
End Sub