Τοποθετήστε μια νέα μορφή , κάνοντας κλικ στο "Αρχείο" μενού σε Visual Basic και επιλέγοντας "New Project ". Επιλέξτε " Standard EXE " ως τον τύπο σε Visual Basic 6.0 . Σε εκδόσεις του Visual Basic.NET , το όνομα του προτύπου είναι " Windows Forms Application ". Μόλις μια φόρμα είναι ανοιχτή , μπορείτε να δείτε δύο ελέγχους στα αριστερά που μοιάζουν με πίνακες . Κάντε διπλό κλικ στο ένα δεξί χέρι , ένα πλαίσιο λίστας , για να το προσθέσετε στην κενή φόρμα . Επαναλάβετε αυτή τη διαδικασία για να προσθέσετε ένα δεύτερο πλαίσιο λίστας και, στη συνέχεια, σύρετε το προς τα δεξιά του πρώτου . Αναπτύξτε τη φόρμα χρησιμοποιώντας τις λαβές στο κάτω μέρος και δεξιά της φόρμας .
Πειραματιστείτε με τα περιεχόμενα πλαισίου λίστας και τις ιδιότητές του . Αλλάξτε το " Ταξινόμηση " κτήμα του κάθε πλαισίου λίστας με το " True ". Αλλάξτε το ForeColor του πλαισίου λίστας δεξί χέρι του "Red ". Για την προετοιμασία για το επόμενο βήμα στο φροντιστήριο , προσθέστε τέσσερα κουμπιά εντολών από την Εργαλειοθήκη τακτοποίηση τους , όπως στην εικόνα . Σημείωση : το κείμενο στα πλαίσια έχει οριστεί για μεγαλύτερη ορατότητα . Χρησιμοποιώντας τον πίνακα Properties στα δεξιά , κάνει κάθε κουμπί λεζάντα Command ως εξής : Επάνω Αριστερά : " Προσθήκη νέου στοιχείου " Top Δεξιά: " Επιλέξτε ένα στοιχείο " Κάτω αριστερά : " Εκτύπωση Επιλεγμένες List" Κάτω δεξιά : " Διαγραφή ενός αντικειμένου " Η χρήσεις από αυτά τα κουμπιά θα γίνει σαφές, όπως εργάζεστε με το φροντιστήριο .
εικόνων Ρύθμιση της Tutorial
Η
Αλλαγή από την προβολή σχεδίασης για την προβολή κώδικα κάνοντας κλικ στο " View , " " Κώδικας "στο μενού . Για να ενεργοποιήσετε τα πλήκτρα εντολών προστίθενται παραπάνω , πληκτρολογήστε τον κωδικό ακριβώς όπως εμφανίζεται : Private Sub Command1_Click ( ) Dim NewItem Όπως StringNewItem = InputBox ( " Πληκτρολογήστε το νέο στοιχείο για τη λίστα " ) List1.AddItem NewItemEnd SubPrivate Sub Command2_Click ( ) Αν List1 . ListIndex > = 0 ThenList2.AddItem List1.TextList1.RemoveItem List1.ListIndexEnd IfEnd SubPrivate Sub Command3_Click ( ) Αν List2.ListIndex > = 0 ThenList1.AddItem List2.TextList2.RemoveItem List2.ListIndexEnd IfEnd SubPrivate Sub Command4_Click ( ) Dim n Όπως IntegerFor n = 0 Για List2.ListCount - 1Print n & "" & List2.List (n ) ΕπόμενοΤέλος Sub
Η Χρήση του πλαισίου λίστας ελέγχου
Η
Οι τρόποι να χρησιμοποιήσετε αυτά τα κουμπιά θα είναι εμφανές όταν πατήσετε το πλήκτρο " F5 " για να εκτελέσετε το πρόγραμμα ( η εικόνα έχει προσυμπληρωμένη με κάποια στοιχεία ) . Ξεκινήστε χρησιμοποιώντας την " Προσθήκη νέου στοιχείου " εντολή . Κάθε φορά που χρησιμοποιείτε αυτό , ένα παράθυρο θα σας ζητήσει να προσθέσετε ένα νέο στοιχείο . Δοκιμάστε να προσθέσετε κάποια ονόματα των χωρών με τυχαία σειρά . " Επιλέξτε ένα στοιχείο " αφαιρεί από το αριστερό πλαίσιο και προσθέτει ότι προς τα δεξιά . " Σβήστε ένα στοιχείο" κάνει το αντίθετο . Το κουμπί "Print" στέλνει στην οθόνη , αλλά με μία τροποποίηση θα μπορούσε να χρησιμοποιήσει έναν εκτυπωτή αντ 'αυτού. Πρόσθετος κωδικός μπορεί να αλλάξει την επιλογή έτσι ώστε κρατώντας πατημένο το πλήκτρο Shift ο χρήστης μπορεί να επιλέξει πολλά στοιχεία .
Ιδιότητες πλαισίου λίστας περιλαμβάνουν τη σύνδεση με μια βάση δεδομένων για περαιτέρω χρήση των επιλεγμένων δεδομένων . Κουτιά μπορεί να συμπληρωθεί είτε ένα στοιχείο κάθε φορά , όπως φαίνεται εδώ , χρησιμοποιώντας μια σειρά από στοιχεία για να προσθέσετε όλα με τη μία ή με την εισαγωγή προ - επιλεγμένο αρχείο κειμένου . Αυτός είναι ο τρόπος με τον μακρύ κατάλογο των χωρών εμφανίζονται σε εκδόσεις Web του πλαισίου λίστας .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα