1 Κάντε κλικ στο Visual Studio 2010 το εικονίδιο για να φορτώσετε την εφαρμογή . Εμφανίζεται η σελίδα "Start" . Κάντε κλικ στο κουμπί με την ένδειξη " New Project" ? Το παράθυρο διαλόγου "New Project " ανοίγει 2
Επιλέξτε " Visual Basic" στην αριστερή στήλη του παραθύρου διαλόγου " New Project" . . Επιλέξτε " Εφαρμογή κονσόλας " στη δεξιά στήλη του παραθύρου διαλόγου " New Project" . Ένα νέο έργο έχει δημιουργηθεί και ένα αρχείο πηγαίου κώδικα εμφανίζεται στο κύριο παράθυρο του επεξεργαστή . Ο πηγαίος κώδικας περιέχει τις γραμμές :
Sub Main ( )
End Sub
εικόνων 3
Πληκτρολογήστε το ακόλουθο κείμενο μεταξύ των " Sub Main ( ) " και " End Sub " να δηλώσει μια νέα λίστα των τύπων ακέραιο αριθμό :
λίστα Dim Όπως νέας λίστας ( από ακέραιος )
Η 4
Εισάγετε τις ακόλουθες δηλώσεις μετά την κήρυξη λίστα για να προσθέσετε μια στοιχείο στη λίστα . Το σημείο αυτό θα πρέπει να προστεθεί στο τέλος της λίστας . Μπορείτε να επαναλάβετε αυτό το βήμα όσες φορές θέλετε να δημιουργήσετε μια πολύ μεγάλη λίστα , ή μπορείτε να κρατήσετε τη λίστα σύντομη και μόνο να εκτελέσει αυτό το βήμα μία ή δύο φορές .
List.Add ( 42 )
5
Πληκτρολογήστε την ακόλουθη δήλωση για να αναδιατάξετε τη λίστα χρησιμοποιώντας τη μέθοδο " Ταξινόμηση " . Αυτό ταξινομεί τις τιμές του καταλόγου κατά σειρά από τουλάχιστον στο μεγαλύτερο
list.sort ( )
Η 6
Εισάγετε αυτή τη δήλωση για να δημιουργήσετε μια προσωρινή μεταβλητή ακέραιο : .
Dim num As Integer
Η 7
Loop σε ολόκληρη τη λίστα χρησιμοποιώντας ένα " για κάθε« δήλωση:
Για Κάθε αριθμός Στη λίστα
8
Enter μια δήλωση που εξάγει από την αξία του αντικειμένου στην τρέχουσα επανάληψη του βρόχου :
Console.WriteLine ( αριθμός )
Η 9
Πληκτρολογήστε την ακόλουθη δήλωση για τη σύναψη της " για κάθε " δήλωση:
Επόμενο
Η 10
Πιέστε το πράσινο πλήκτρο" Play " για να εκτελέσει το πρόγραμμα . Θα δημιουργήσει μια λίστα και , στη συνέχεια, να αναδιατάξετε το σε τουλάχιστον προς μεγαλύτερη παραγγελία . Η έξοδος στέλνεται σε ένα παράθυρο εξόδου .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα