Δημιουργία πολυδιάστατη σειρά σας . Προετοιμάσει το αντικείμενο πίνακα , πριν να αξιολογηθεί το περιεχόμενό της . Ο παρακάτω κώδικας δημιουργεί μια πολυδιάστατη array με το όνομα " myArray " :
Dim myArray Όπως Array = Array.CreateInstance ( 6 , 5 )
Η σειρά περιλαμβάνει δύο διαστάσεις . Το πρώτο είναι έξι και το δεύτερο είναι πέντε . 2
Αξιολόγηση των άνω φράγματα της πρώτης διάστασης . Αν χρειαστεί να εκτυπώσετε ή να χρησιμοποιήσετε τη διάσταση σε ένα άλλο μέρος του κωδικού σας, τότε να εκχωρήσετε σε μια μεταβλητή . Ο παρακάτω κώδικας μας να έχει το ανώτερο όριο για την πρώτη διάσταση και εκχωρεί στη μεταβλητή " firstDim . "
Δημ. firstDim ως IntegerfirstDim = myArray.GetUpperBound ( 0 )
εικόνων 3
Ορίστε μια μεταβλητή για τη δεύτερη διάσταση . Από τιμές του πίνακα ξεκινήσει με 0 , η δεύτερη διάσταση είναι 1 . Ο κώδικας που ακολουθεί παίρνει το εύρος της δεύτερης διάστασης του :
Δημ. secondDim ως IntegersecondDim = myArray.GetUpperBound ( 1 )
Η 4
Εκτυπώστε τις τιμές για τις διαστάσεις του πίνακα . Ο ακόλουθος κώδικας μπορεί να χρησιμοποιηθεί για να εκτυπώσετε τα αποτελέσματα στο παράθυρο εντοπισμού σφαλμάτων για να εξετάσουν τα αποτελέσματα :
Εκτύπωση firstDim & "" & secondDim
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα