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