Πώς να κάνει ένα γράφημα γραμμής με Visual Basic

Κάνοντας ένα γράφημα γραμμής σε Visual Basic.NET ή VB.NET , δεν είναι τόσο περίπλοκο όπως μπορείτε να σκεφτείτε . Μπορείτε να χρησιμοποιήσετε τους ελέγχους διάγραμμα σε VB για να δημιουργήσετε μια απλή , διαισθητική και οπτικά συναρπαστικό διαγράμματα για περίπλοκες στατιστικές και οικονομικές αναλύσεις . Χρησιμοποιήστε τη Σειρά και σημεία ιδιότητες για να καθορίσει τα δεδομένα που θέλετε να εμφανίσετε στο γράφημά σας . Το ακίνητο ChartType χρησιμοποιείται για να καθορίσει τον τύπο του γραφήματος που θέλετε να χρησιμοποιήσετε , όπως ένα γράφημα γραμμής . Τα πράγματα που θα χρειαστείτε για Microsoft Visual Studio
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

την εφαρμογή Microsoft Visual Studio , κάντε κλικ στο " New Project" από το αριστερό τμήμα του παραθύρου της οθόνης του υπολογιστή σας , και επεκτείνουν " Visual Basic" κάτω από Εγκατεστημένα πρότυπα . Κάντε κλικ στο "Windows" και κάντε διπλό κλικ στο " Windows Forms Application " από το κέντρο του παραθύρου διαλόγου για να δημιουργήσετε ένα νέο έργο . 2

Κάντε δεξί κλικ στο παράθυρο Εργαλειοθήκη και κάντε κλικ στο " Choose Items . " Κάντε κλικ στην καρτέλα " . NET Framework Components " και επιλέξτε το " Chart " για να προσθέσετε ένα νέο διάγραμμα ελέγχου στην Εργαλειοθήκη . Κάντε διπλό κλικ στο " Διάγραμμα " ελέγχου για να προσθέσετε ένα νέο διάγραμμα ελέγχου στη φόρμα σας . Κάντε διπλό κλικ στο " κουμπί" για να προσθέσετε ένα νέο κουμπί στη φόρμα σας .
Εικόνων 3

δεξί κλικ φόρμα σας και κάντε κλικ στο " Προβολή κώδικα " για να ξεκινήσει τη λειτουργική μονάδα κώδικα VB . Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να καθορίσει τις ιδιότητες διάγραμμα κατά τη διάρκεια της εκδήλωσης φορτίο μορφή :

Dim dtGraph Όπως New DataTable

Private Sub Form1_Load ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως συστήματος . EventArgs ) Λαβές MyBase.Load

dtGraph.Columns.Add ( " χρονική στιγμή " , 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 )

Με Chart1.ChartAreas ( 0 )

. AxisX.Minimum = 0

. AxisX.Maximum = 3000

. AxisY.Minimum = 0

. AxisY.Maximum = 60

. AxisY.Interval = 10

. AxisX.Title = "Χρόνος "

. AxisY.Title = " Ταχύτητα "

End With

End Sub
Η

4 Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να κάνει το γράφημα γραμμής :

Private Sub Button1_Click ( ByVal αποστολέα Όπως System.Object , ByVal e Όπως System.EventArgs ) Λαβές Button1.Click

Με Chart1.Series ( 0 )

Points. . DataBind ( dtGraph.DefaultView , " χρονική στιγμή " , "Speed" , Τίποτα )

. ChartType = DataVisualization.Charting.SeriesChartType.Line

. borderwidth = 4

End με

End Sub
Η
εικόνων