Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Visual Studio , kliknite na tlačidlo " Nový projekt " v ľavej časti okna obrazovky počítača , a rozšíriť " Visual Basic " pod Nainštalované šablóny . Kliknite na " Windows " a double - kliknite na " Windows Forms aplikácie " od stredu okna na vytvorenie nového projektu .
2
Pravým tlačidlom myši na panel Toolbox a kliknite na tlačidlo " Vybrať položky . " Kliknite na kartu " . NET Framework Components " a zaškrtnite " Graf " okno pre pridanie nového ovládacieho prvku grafu na paneli nástrojov. Dvakrát kliknite na ovládací prvok " Chart " pridať nový ovládací prvok grafu do formulára . Double - kliknite na " tlačidlo " pridať nové tlačidlo do formulára .
3
pravým tlačidlom myši na formulár a kliknite na tlačidlo " Zobraziť kód " pre spustenie VB kód modulu . Skopírujte a vložte nasledujúci kód pre definovanie vlastností grafu priebehu udalosti formulára zaťaženia :
Dim dtGraph ako New DataTable
Private Sub Form1_Load ( byval odosielateľa Ako System.Object , byval e ako systém . EventArgs ) Kľuky MyBase.Load klipart
dtGraph.Columns.Add ( " časovom bode " , gettype ( Integer ) )
dtGraph.Columns.Add ( " Speed " , gettype ( Integer ) )
dtGraph.Rows.Add ( 0 , 0 )
dtGraph.Rows.Add ( 1000 , 50 )
dtGraph.Rows.Add ( 2000 , 50 )
dtGraph.Rows.Add ( 3000 , 0 )
S Chart1.ChartAreas ( 0 )
. AxisX.Minimum = 0
. AxisX.Maximum = 3000
. AxisY.Minimum = 0
. AxisY.Maximum = 60
. AxisY.Interval = 10
. AxisX.Title = " Čas "
. AxisY.Title = " Rýchlosť "
End With
End Sub
4
skopírujte a vložte nasledujúci kód , aby sa čiarový graf :
Private Sub Button1_Click ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky Button1.Click
Chart1.Series ( 0 )
bodov . . DataBind ( dtGraph.DefaultView , " časovom bode " , " Speed " , Nothing )
. ChartType = DataVisualization.Charting.SeriesChartType.Line
. BorderWidth = 4
Koniec S
End Sub