Η Visual Basic είναι μια γλώσσα ανάπτυξης εφαρμογών που δημιουργήθηκε από τη Microsoft και χρησιμοποιείται για την ανάπτυξη εφαρμογών λογισμικού επιφάνειας εργασίας. Όπως και οι περισσότερες γλώσσες προγραμματισμού, το VB μπορεί να χρησιμοποιηθεί για την εκτέλεση μαθηματικών εξισώσεων, όπως οι μέσοι υπολογισμοί που χρησιμοποιούνται για τον υπολογισμό των μέσων σημείων βαθμού. Ακολουθώντας τα βήματα αυτού του άρθρου, μπορείτε να δημιουργήσετε μια αριθμομηχανή GPA που επιτρέπει στο χρήστη να εισάγει έναν βαθμό και να το αποθηκεύσει στη βάση δεδομένων της εφαρμογής, όπου θα γίνει ο μέσος όρος.
Βήμα 1
Ξεκινήστε την εφαρμογή Visual Studio 2008 για να ανοίξετε ένα νέο έγγραφο VB, με το οποίο θα κωδικοποιήσετε την εφαρμογή αριθμομηχανής GPA.
Βήμα 2
Δημιουργήστε μια νέα φόρμα που θα λάβει τα ονόματα βαθμών και τάξεων:
Δημιουργία υπορουτίνας για την καταγραφή της καταχώρησης των βαθμών και των ονομάτων τάξεων: Private Sub btnRecord_Click (από τον αποστολέαVal ως System.Object, System.EventArgs) Χειριστεί το btnRecord .Click
Βήμα 4
Ορίστε τον τύπο που θα υπολογίσει τη ΣΔΣ προσθέτοντας τον ακόλουθο κώδικα: GPA + = Βαθμός () Βαθμός = Credits + = CDbl (Credits.text)
Βήμα 5
Δημιουργήστε τα επιχειρήματα για κάθε μία από τις πιθανές επιλογές βαθμού και αντιστοιχίστε τους μια αριθμητική τιμή, για παράδειγμα: Εάν Grade.Text = "A" Στη συνέχεια GPA + = 4 End If If Gr Ακολουθεί GPA + = 3 Τέλος Αν Εάν Grade.Text = "C" Στη συνέχεια GPA + = 2 Τέλος Αν Εάν Grade.Text = "D" Στη συνέχεια GPA + = 1 Τέλος αν
Βήμα 6
Κλείστε την υπορουτίνα για την αριθμομηχανή και δημιουργήστε μια νέα που είναι υπεύθυνη για την αποθήκευση των αποτελεσμάτων της αριθμομηχανής: End Sub Private btnCalculate_Click (ByVal αποστολέας ως System.Object, As System.EventArgs) Λαβές btnCalculate.Click Dim averageGPA Ως διπλό = GPA /Credits textGPA.Text = CStr ((GPA)) Τέλος υποτελών κλάσης
Αποθηκεύστε τον κώδικα VB και μεταγλωττίστε τον χρησιμοποιώντας τον προτιμώμενο μεταγλωττιστή κώδικα για να εκτελέσετε τον κώδικα ως εφαρμογή επιφάνειας εργασίας.
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα