Πώς να υπολογίσετε Περιμετρική & Περιοχή παραλληλόγραμμο με Visual Basic

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

Δείτε την καρτέλα εργαλειοθήκη . Δημιουργία τέσσερα πλαίσια κειμένου και τέσσερις ετικέτες σε μορφή Visual Basic σχεδιασμό . Κλείστε την καρτέλα εργαλειοθήκη . Τακτοποιήστε τα σε δύο στήλες με τις ετικέτες στα αριστερά και textboxes στα δεξιά . Μεταβείτε στις ιδιότητες του κειμένου κάθε ετικέτας . Αλλάξτε τις κοινές ονομασίες για περιγραφικούς όρους όπως μήκος, ύψος , εμβαδόν και την περίμετρο . Χρησιμοποιώντας απλές ετικέτες αποφεύγει αργότερα σύγχυση . 2

Δείτε και πάλι την καρτέλα εργαλειοθήκη . Προσθέστε ένα κουμπί στη φόρμα της Visual Basic σχεδιασμό . Μεταβείτε στις ιδιότητες του κειμένου του κουμπιού . Αλλάξτε το όνομα του κουμπιού από τη γενική λύση ( π.χ. , Button1 ) σε ένα περιγραφικό όρο, όπως Υπολογισμός.
Εικόνων 3

Δείτε το παράθυρο κωδικοποίησης . Προσθέστε γραμμές εντολών μεταξύ της δήλωσης Button και τον συμβολισμό SUB σύναψη ΤΕΛΟΣ . Χρησιμοποιήστε το "Dim " εντολή για να δηλώσει τέσσερις διαφορετικές μεταβλητές . Παρά το γεγονός ότι τα ονόματα των μεταβλητών μπορεί να είναι οτιδήποτε , χρησιμοποιούν τα ίδια ονόματα ετικέτα που καθορίζεται στο Βήμα 1 . Χρησιμοποιήστε το " As" εντολές να δηλώσει κάθε μεταβλητή να είναι είτε ένας ακέραιος αριθμός που ή δεκαδικό ( π.χ. , Dim μήκος ως δεκαδικά ) .
Η 4

Προσθέστε γραμμές εντολών για να εξισώσουν του μήκους και του ύψους των μεταβλητών με τις πληροφορίες που βρέθηκαν στο κατάλληλα πλαίσια κειμένου ( π.χ. , μήκος = TextBox1.Text ) .
5

Προσθέστε μια γραμμή εντολών για κάθε μαθηματική συνάρτηση . Δηλώστε τη μεταβλητή περιοχή να είναι η υπολογιζόμενη προϊόν του μήκους και του πλάτους ( π.χ. , περιοχή = μήκος * πλάτος) . Δηλώστε τη μεταβλητή περίμετρο είναι το υπολογιζόμενο ποσό του ορθογωνίου τέσσερις πλευρές [ π.χ. , περίμετρο = ( ( μήκος 2 * πλάτος) + ( 2 * ) ) ] .
Η 6

Προσθέστε μια γραμμή εντολών για την έξοδο υπολογιζόμενη τιμή της μεταβλητής περιοχής στο κατάλληλο κουτάκι (π.χ. , TextBox3.Text = περιοχή ) . Προσθέστε μια τελική γραμμή κώδικα για να μεταφέρετε υπολογιζόμενη τιμή της μεταβλητής περιμέτρου σε κατάλληλο κουτάκι της ( π.χ. , TextBox4.Text = περίμετρος ) .
Η

7 Αποθηκεύστε το πρόγραμμα . Εκτελέστε το πρόγραμμα σε λειτουργία εντοπισμού σφαλμάτων , για να επαληθεύσει ότι λειτουργεί σωστά . Αυτό ανοίγει ένα νέο παράθυρο . Επιλέξτε τιμές για το μήκος και το ύψος και τη συμβολή αυτών στη σωστή κουτιά . Κάντε κλικ στο κουμπί για να υπολογίσετε τις τιμές για το εμβαδόν και την περίμετρο .
Η
εικόνων