Ξεκινήστε το Microsoft Visual Basic Express , κάντε κλικ στο " New Project ... " στο αριστερό τμήμα της οθόνης του υπολογιστή σας και , στη συνέχεια, κάντε διπλό κλικ στο " Windows Forms Application " για να δημιουργήσετε ένα νέο έργο . 2
διπλό κλικ στο " κουμπί" για την " Toolbox" παράθυρο για να προσθέσετε ένα νέο κουμπί ελέγχου . Κάντε διπλό κλικ στο " Ετικέτα " για να προσθέσετε μια νέα ετικέτα και κάντε διπλό κλικ στο " πλαίσιο κειμένου " για να προσθέσετε ένα νέο πλαίσιο κειμένου . Κάντε διπλό κλικ στο έντυπο να ανοίξει " Form1.vb » και πληκτρολογήστε τον ακόλουθο κώδικα παρακάτω " Form1_Load " για να προσθέσετε το κείμενο με την ετικέτα : " . Πληκτρολογήστε έναν αριθμό μεταξύ 0 και 10 "
Me.Label1.Text =
εικόνων 3
κάντε κλικ στο " Form1.vb [ Σχέδιο ] , " διπλό κλικ " Button1 " για να ανοίξετε τη μονάδα κώδικα και πληκτρολογήστε την παρακάτω κάτω από την διαδικασία « Button1_Click " για να δημιουργήσετε μια μεταβλητή :
Dim myNum As Integer
4
Πληκτρολογήστε το παρακάτω για να πάρετε την τιμή από το στοιχείο ελέγχου πλαισίου κειμένου :
myNum = Me.TextBox1.Text
5
Πληκτρολογήστε τον ακόλουθο κώδικα για να εκτελέσει μια ομάδα ένθετων " If ... Then ... Else " δηλώσεις για να βρείτε τον αριθμό που έχει εισαχθεί από το χρήστη :
Αν myNum > = 0 και myNum <= 10 τότε
Αν myNum > 5 και myNum <= 10 τότε
Εάν myNum = 6 τότε
MsgBox ( " Έχετε πληκτρολογήσει τον αριθμό 6 " )
ElseIf myNum = 7 τότε
MsgBox ( "Πληκτρολογήσατε αριθμό 7 " )
ElseIf myNum = 8 τότε
MsgBox ( "Πληκτρολογήσατε αριθμό 8 " )
ElseIf myNum = 9 τότε
MsgBox ( "Πληκτρολογήσατε αριθμό 9 " )
υπόλοιπα
MsgBox ( " Έχετε πληκτρολογήσει τον αριθμό 10 " )
End If
Else
Εάν myNum = 0 τότε
MsgBox ( "Πληκτρολογήσατε αριθμό 0 " )
ElseIf myNum = 1 Στη συνέχεια
MsgBox ( " Έχετε εισάγει νούμερο 1 " )
ElseIf myNum = 2 τότε
MsgBox ( "Πληκτρολογήσατε αριθμό 2 " )
ElseIf myNum = 3 τότε
MsgBox ( "Πληκτρολογήσατε αριθμό 3 " )
ElseIf myNum = 4 τότε
MsgBox ( "Πληκτρολογήσατε αριθμό 4 " )
αλλιώς
MsgBox ( " Έχετε πληκτρολογήσει τον αριθμό 5 " )
End If
End If
Else
MsgBox ( " Παρακαλώ εισάγετε ένας αριθμός μεταξύ 0 και 10 " )
End If
το πρόγραμμα θα αφήσει το χρήστη να γνωρίζει αν ο αριθμός που εισάγεται δεν είναι στη σειρά .
Η
6 Πατήστε το πλήκτρο" F5 "για να εκτελέσετε το πρόγραμμα και πληκτρολογήστε έναν αριθμό μεταξύ μηδέν και 10 . Κάντε κλικ στο " Button1 " για να εκτελέσει τον κώδικα και να εμφανίσει τον αριθμό που έχετε εισαγάγει .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα