Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Visual Basic Πίνακες Tutorial

Visual Basic της Microsoft επιτρέπει την εύκολη δηλώνοντας και το χειρισμό των μεταβλητών μόνο στοιχείο , αλλά μερικές φορές χρειάζεται κάτι περισσότερο , σαν ένα πίνακα των στοιχείων με τα ίδια χαρακτηριστικά . Μπορεί να θέλετε να βρόχο μέσω του πίνακα εκτύπωση των στοιχείων , ή μπορεί να θέλετε να οικοδομήσουμε τον πίνακα από μια βάση δεδομένων . VB.NET διευκολύνει αυτή τη λειτουργικότητα μέσω της χρήσης των συστοιχιών , συμπεριλαμβανομένων πολυδιάστατη συστοιχίες . Οδηγίες
Η 1

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

Μετακινηθείτε τον κέρσορα πάνω από την καρτέλα Toolbox προς τα αριστερά του παραθύρου σχεδίασης για να ανοίξετε το μενού Εργαλειοθήκη . Μπορεί να χρειαστούν μερικά δευτερόλεπτα για να φορτώσει την εργαλειοθήκη και να το εμφανίσετε .
Εικόνων 3

Κάντε διπλό κλικ στο " πλαίσιο λίστας " μενού στην ενότητα Κοινή Έλεγχοι της εργαλειοθήκης για να προσθέσετε ένα πλαίσιο λίστας για να σας μορφή . Κάντε διπλό κλικ στο " κουμπί" μενού δύο φορές για να προσθέσετε δύο κουμπιά στη φόρμα σας . Κάντε διπλό κλικ στο " Πλαίσιο κειμένου " στοιχείο μενού για να προσθέσετε ένα πλαίσιο κειμένου στη φόρμα σας . Σύρετε τα στοιχεία ελέγχου της φόρμας για να κανονίσετε Button1 κάτω από το πλαίσιο κειμένου και να οργανώσει Button2 κάτω από το πλαίσιο λίστας .
Η

4 Κάντε διπλό κλικ στο κουμπί " Προσθήκη στοιχείου " για να ανοίξετε το παράθυρο κώδικα της Visual Basic . Κάντε κλικ στην κενή γραμμή κάτω από την "Δημόσια Τάξη Form1 " δήλωση στην κορυφή του παραθύρου και βασικά η ακόλουθη γραμμή :

Δημ. ItemArray ( 9 ) Όπως String Dim

ArrayCountInteger As Integer

Αυτή η πρόταση δηλώνει μια σειρά από έως και δέκα στοιχεία κορδόνι τύπου και ένα μετρητή ακέραιο . Ο μετρητής αρχίζει πάντα από το μηδέν , έτσι ώστε το "Dim " δήλωση καθορίζει τον αριθμό εννέα , ένα λιγότερο από τον αριθμό των στοιχείων του πίνακα .
5

Κάντε κλικ στην κενή γραμμή μετά το " Private Sub Button1_Click " δήλωση και εισάγετε τον παρακάτω κωδικό , έτσι ώστε η όλη διαδικασία με την αρχή και το τέλος των γραμμών μοιάζει με αυτό :

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

Αν TextBox1.Text > " " τότε

Εάν ArrayCountInteger = 10 τότε

MessageBox.Show ( " Έχετε εισέλθει στο μέγιστο αριθμό στοιχείων " )

Επιστροφή

End If

ItemArray ( ArrayCountInteger ) = TextBox1.Text

ArrayCountInteger + = 1

TextBox1.Clear ( )

TextBox1.Focus ( )

End If

End Sub

αυτή κώδικας διαβάζει κάθε στοιχείο που εισάγετε στο πλαίσιο κειμένου και το βάζει στη συστοιχία .

6

Εμφάνιση του πίνακα. Κάντε κλικ στην καρτέλα Σχεδίαση για να επιστρέψετε στο παράθυρο σχεδίασης. Κάντε διπλό κλικ στο κουμπί " Είδη List" για να επιστρέψετε στο παράθυρο κώδικα . Εισάγετε τον κωδικό μεταξύ των δύο γραμμών , έτσι ώστε το τελικό αποτέλεσμα να μοιάζει με αυτό :

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

Dim ListArrayCountInteger As Integer

Do While ListArrayCountInteger <( ArrayCountInteger + 1 )

Εάν ItemArray ( ListArrayCountInteger ) > " " τότε

ListBox1.Items.Add ( ItemArray ( ListArrayCountInteger ) )

ListArrayCountInteger + = 1

Else

MessageBox.Show ( "No περισσότερα στοιχεία " )

Επιστροφή

End If

Loop

Αυτός ο κώδικας διαβάζει τον πίνακα χρησιμοποιώντας ένα βρόχο και τοποθετεί τα στοιχεία στο πλαίσιο λίστας για την προβολή .
Η

7 Κάντε κλικ στο " Εντοπισμός σφαλμάτων " μενού στο το πάνω μέρος της οθόνης και κάντε κλικ στο σύνδεσμο "Start Debugging " για να ελέγξετε το πρόγραμμά σας . Εισάγετε ένα αντικείμενο μέσα στο πλαίσιο κειμένου και κάντε κλικ στο κουμπί " Προσθήκη στοιχείου " . Προσθέστε πολλά στοιχεία και κάντε κλικ στο κουμπί " στοιχεία λίστας " για να δείτε τα στοιχεία σας στο πλαίσιο λίστας .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα