Ανοίξτε Visual Basic και να δημιουργήσετε ένα νέα Windows μορφή του έργου . Κάντε κλικ στο " Αρχείο , " τότε " New Project" . Όταν εμφανιστεί το παράθυρο διαλόγου New Project , επιλέξτε "Windows" από την προβολή δέντρου , επιλέξτε " Windows Forms Application " από τους τύπους έργων , στο όνομα του έργου " FormSamples , " και στη συνέχεια κάντε κλικ στο κουμπί OK . Θα εμφανιστεί ένα νέο έντυπο . 2
Σύρετε μια ετικέτα και τρία κουμπιά στη νέα μορφή . Κάντε δεξί κλικ στην ετικέτα και επιλέξτε "Ιδιότητες". Ονομάστε την ετικέτα " lblTitle " και πληκτρολογήστε " Welcome" στην ιδιότητα Text . Κάντε κλικ στο " ESCAPE " για να επιστρέψετε στην σχεδιαστής της φόρμας . Επαναλάβετε τη διαδικασία για κάθε ένα από τα κουμπιά , εισάγοντας " Σύνδεση ", " View" και " Κλείσιμο" για την ιδιότητα Text του κάθε κουμπιού .
Εικόνων 3
Δημιουργήστε μια δεύτερη μορφή . Κάντε κλικ στο "Project " και στη συνέχεια " Δημιουργία νέας φόρμας των Windows . " Ονομάστε το έντυπο " LoginForm . " Σύρετε μια ετικέτα , κειμένου και δύο κουμπιά πάνω στο έντυπο . Αλλάξτε την ιδιότητα Κείμενο της ετικέτας στο "Name : " όνομα στο πλαίσιο κειμένου " txtName » και επισημαίνουν τα πλήκτρα " Σύνδεση " και "Cancel ".
Κάντε διπλό κλικ στο κουμπί Σύνδεση για να ανοίξετε το παράθυρο κώδικα και προσθέστε τον ακόλουθο κώδικα :
DialogResult = DialogResult.OK
Κάντε κλικ στο Προβολή σχεδίασης , στη συνέχεια, να επιστρέψετε στην προβολή σχεδίασης φόρμας . Κάντε διπλό κλικ στο κουμπί Άκυρο και προσθέστε τον ακόλουθο κώδικα :
DialogResult = DialogResult.Cancel
Η 4
Επιστροφή στην πρώτη μορφή κάνοντας κλικ στο " Φόρμα1 " στο παράθυρο του Solution Explorer. Κάντε διπλό κλικ στο κουμπί Είσοδος και προσθέστε τον ακόλουθο κώδικα :
Dim frm As New LoginForm
Αν frm.ShowDialog = DialogResult.OK Τότε
lblTitle.Text = " Welcome" & frm.txtName.Text
End If
frm.Close ( )
Αυτός ο κώδικας δημιουργεί ένα νέο στιγμιότυπο του φόρμα σύνδεσης , στη συνέχεια, χρησιμοποιεί τη μέθοδο της ShowDialog να ανοίξτε τη φόρμα . Εάν το κουμπί login χτυπιέται, ShowDialog επιστρέφει DialogResult.OK και τα αντίγραφα κωδικός και το όνομα από το πλαίσιο κειμένου στο μήνυμα καλωσορίσματος . Αν το " Άκυρο " παίρνει κλικ , ο κωδικός αυτός αγνοείται . Η μέθοδο Close κλείνει το παράθυρο διαλόγου μορφή .
Εικόνων Χρησιμοποιώντας τη μέθοδο Εμφάνιση
5
Δημιουργήστε μια άλλη μορφή που ονομάζεται " ViewForm . " Σύρετε ένα σήμα και ένα κουμπί από την εργαλειοθήκη στη φόρμα . Αλλάξτε την ιδιότητα Name της ετικέτας για να « lblContent " και να αλλάξετε την ιδιότητα Text του κουμπιού για να
Η
6 Κάντε διπλό κλικ στο κουμπί " Κλείσιμο" και προσθέστε τον παρακάτω κώδικα "Close ". :
Κλείσιμο ()
Η 7
Επιστροφή στην σχεδιαστής της φόρμας Φόρμα1 , στη συνέχεια, κάντε διπλό κλικ στο κουμπί "Προβολή " . Προσθέστε τον ακόλουθο κώδικα :
Dim frm As New ViewForm
frm.lblContent.Text = lblTitle.Text & " . . Place περιεχόμενο εδώ "
frm.Show ( )
Αυτός ο κώδικας δημιουργεί ένα νέο στιγμιότυπο της ViewForm . Στη συνέχεια, ορίζει την ιδιότητα κείμενο της ετικέτας και καλεί τη μέθοδο εμφάνιση της φόρμας . Σημειώστε ότι δεν υπάρχει Κλείστε μέθοδος και η μέθοδος Εμφάνιση δεν ψάχνει για μια τιμή επιστροφής .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα