την εφαρμογή Microsoft Visual Studio , κάντε κλικ στο " New Project" που βρίσκεται στο αριστερό τμήμα της οθόνης του υπολογιστή σας , και να επεκτείνουν " Visual Basic " κάτω " Εγκατεστημένα πρότυπα . " Κάντε κλικ στο "Windows" και κάντε διπλό κλικ στο " Windows Forms Application " για να δημιουργήσετε ένα νέο έργο με UI . 2
διπλό κλικ στο " Πλαίσιο κειμένου " να από την "Toolbox " παράθυρο για να προσθέσετε ένα νέο στοιχείο ελέγχου πλαισίου κειμένου στη φόρμα σας . Προσθέστε ένα δεύτερο πλαίσιο κειμένου . Κάντε διπλό κλικ στο " κουμπί" για να του "Toolbox " παράθυρο για να προσθέσετε ένα νέο κουμπί ελέγχου στη φόρμα σας . . Κάντε διπλό κλικ στο " Button1 " για να δημιουργήσετε ένα συμβάν κλικ για το κουμπί
εικόνων 3
Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να δημιουργήσετε τέσσερις νέες μεταβλητές που θα χρησιμοποιήσετε στο πρόγραμμά σας :
Dim firstNum Όπως IntegerDim secondNum Ως αποτέλεσμα IntegerDim Όπως IntegerDim inputError Όπως Boolean
Η 4
Προσθέστε τον ακόλουθο κώδικα για να βεβαιωθείτε ότι οι πληροφορίες που εισάγονται στο πλαίσιο κειμένου είναι αριθμητικό και αν δεν είναι , τότε επιστρέφει ένα σφάλμα :
Αν ( IsNumeric ( Me.TextBox1.Text ) ) ThenfirstNum = Me.TextBox1.TextElseMessageBox.Show ( " Παρακαλώ εισάγετε έναν αριθμό στο πλαίσιο 1 " ) inputError = TrueEnd Αν
5
Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να ελέγξει για τα προηγούμενα λάθη και να συνεχίσει τη σύλληψη του αριθμού που αναφέρεται στο κουτί νούμερο δύο :
Εάν inputError = False ThenIf ( IsNumeric ( Me.TextBox2.Text ) ) ThensecondNum = Me . TextBox2.TextElseMessageBox.Show ( "Παρακαλώ εισάγετε έναν αριθμό στο πλαίσιο 2 " ) inputError = TrueEnd IfEnd Αν
Η 6
Προσθέστε τον ακόλουθο κώδικα για να προσθέσετε τόσο από τους αριθμούς και να επιστρέψει το αποτέλεσμα χρησιμοποιώντας ένα πλαίσιο μηνύματος :
Αν inputError = False Thenresult = firstNum + secondNumMessageBox.Show ( " Η προσθήκη αυτών των δύο αριθμών είναι : " & result.ToString ) End If
Η 7
τύπου " F5 " για να τρέξει το πρόγραμμα και να πληκτρολογήσετε έναν αριθμό σε καθένα από τα πλαίσια κειμένου . Κάντε κλικ στο " Button1 " για να πάρει το αποτέλεσμα .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα