Δημιουργία προγράμματος στη Visual Basic: Πρόγραμμα περιήγησης στο Web: 9 βήματα

2024 Συγγραφέας: John Day | [email protected]. Τελευταία τροποποίηση: 2024-01-30 08:39

Αυτό το Instructable εξηγεί τη διαδικασία δημιουργίας μιας απλής εφαρμογής περιήγησης ιστού στο VB. NETI έχει σχεδιαστεί ως συνέχεια του πρώτου μου VB. NET Instructable: Δημιουργία του πρώτου προγράμματος στο Visual Basic. Συνιστάται να διαβάσετε πρώτα αυτό το διδακτικό, καθώς αυτό το διδακτικό υποθέτει ότι έχετε βασικές γνώσεις σχετικά με τη διεπαφή Visual Basic Express Edition, όπως καλύπτεται στο άλλο μου εκπαιδευτικό. Αν και η Visual Basic 2005 Express Edition λειτουργεί καλά για αυτό το εκπαιδευτικό, χρησιμοποιώ Visual Basic 2008 Express Edition, διαθέσιμο από τη Microsoft

Βήμα 1: Δημιουργήστε το έργο

Δημιουργήστε ένα νέο έργο Windows Forms και ονομάστε το πρόγραμμα περιήγησης στο Web. Αλλάξτε το μέγεθος της φόρμας όπως σας αρέσει.

Βήμα 2: Προσθέστε τα στοιχεία ελέγχου και αλλάξτε ιδιότητες

Από την εργαλειοθήκη, σύρετε ένα TextBox, ένα WebBrowser και ένα κουμπί στη φόρμα. Τοποθετήστε τα όπως είναι στην εικόνα. Στη συνέχεια, επεξεργαστείτε την ιδιότητα Anchor του TextBox και του WebBrowser έτσι ώστε να είναι επιλεγμένα όλα τα πλαίσια γύρω από το γκρι τετράγωνο (εμφανίζονται όταν επεξεργάζεστε την ιδιότητα αγκύρωσης), αυτό θα επιτρέψει στα στοιχεία ελέγχου να "τεντωθούν" όταν αλλάξει το μέγεθος της φόρμας. Κάντε το ίδιο για το κουμπί, αλλά ορίστε το μόνο στο "Πάνω, Δεξιά". Αλλάξτε επίσης την ιδιότητα κειμένου του Form1 σε πρόγραμμα περιήγησης στο Web ή κάτι παρόμοιο για να αλλάξετε τη γραμμή τίτλου.

Βήμα 3: Κωδικός

Κάντε διπλό κλικ στο κουμπί 1 και προσθέστε τον ακόλουθο κώδικα στον επεξεργαστή, μετά τη γραμμή "Ιδιωτικό υπο" και πριν από τη γραμμή "Τερματισμός δευτερεύοντος"

WebBrowser1. Navigate (TextBox1. Text)Αυτός ο κώδικας λέει απλώς στο πρόγραμμα: Όταν κάποιος κάνει κλικ στο κουμπί 1, πάρτε το WebBrowser για να πλοηγηθείτε σε ό, τι υπάρχει στο TextBox1 Αυτό είναι! Έχετε ένα πρόγραμμα περιήγησης ιστού που λειτουργεί. Κάντε κλικ στο κουμπί αναπαραγωγής για να το δοκιμάσετε.

Βήμα 4: Περισσότερα πράγματα

Τώρα, δεν νομίζατε ότι θα σας έδινα μόνο μια γραμμή κώδικα - έτσι; Στα επόμενα βήματα, θα εφαρμόσουμε τα ακόλουθα:

• Η γραμμή διευθύνσεων που αλλάζει καθώς αλλάζει η σελίδα
• Πλήκτρα πίσω, εμπρός και ανανέωσης
• Γραμμή κατάστασης.

Βήμα 5: Adress Bar

Προς το παρόν, το μόνο που κάνει η γραμμή διευθύνσεων είναι να εμφανίζει τη σελίδα που πληκτρολογείτε, αν κάνετε κλικ σε έναν σύνδεσμο, η αλλαγή δεν αντικατοπτρίζεται στη γραμμή διευθύνσεων. Για να το διορθώσουμε αυτό, πρέπει να προσθέσουμε κι άλλο κώδικαΓυρίστε πίσω στην προβολή σχεδίασης, κάντε κλικ στο "Form 1.vb (Design)" και, στη συνέχεια, κάντε διπλό κλικ στο στοιχείο ελέγχου WebBrowser. Θα επιστρέψει στην προβολή κώδικα, ωστόσο θα υπάρχει κάποιος άλλος κώδικας εκεί, προσέξτε ότι λέει "WebBrowser1_DocumentCompleted", αυτός είναι ο κώδικας που θέλουμε, οπότε δεν χρειάζεται να κάνουμε καμία αλλαγή εδώ, αλλά υπάρχει ένα κενό γραμμή κάτω από αυτήν, πριν από τη δήλωση End Sub, και θέλουμε να προσθέσουμε κάποιο κώδικα εκεί. Πληκτρολογήστε τα παρακάτω εκεί

TextBox1. Text = WebBrowser1. Url. ToStringΑυτό λέει στο πρόγραμμα ότι μόλις ολοκληρωθεί το WebBrowser1_DocumentCompleted, θα πρέπει να αλλάξουμε TextBox1. Text to the WebBrowser1. Url. Το ToString υπάρχει επειδή, από προεπιλογή, η ιδιότητα URL του προγράμματος περιήγησης ιστού δεν είναι ο ίδιος τύπος δεδομένων (συμβολοσειρά), όπως απαιτείται από το πλαίσιο κειμένου. Το ToString γράφει τη διεύθυνση URL σε μια συμβολοσειρά για το TextBox.

Βήμα 6: Κουμπιά δράσης

Επιστρέψτε στην προβολή σχεδίασης και σύρετε 3 νέα κουμπιά στη φόρμα και τοποθετήστε τα. Αλλάξτε την ιδιότητα κειμένου καθενός: Button2 = Back, Button3 = Forward και Button4 = Refresh. Εάν τα τοποθετήσετε όπως η δική μου, προσαρμόστε την ιδιότητα αγκύρωσης του Refresh to Top, κάντε κλικ στο RightDouble στο κουμπί Πίσω και πληκτρολογήστε τον ακόλουθο κώδικα.

WebBrowser1. GoBack () Επιστροφή στο σχέδιο, κάντε διπλό κλικ Προώθηση και πληκτρολόγηση

WebBrowser1. GoForward ()Προβολή σχεδίασης και διπλό κλικ για Ανανέωση

WebBrowser1. Ανανέωση ()Δοκιμάστε το πρόγραμμα περιήγησης και δοκιμάστε τις νέες δυνατότητες.

Βήμα 7: Γραμμή κατάστασης

Επιστρέψτε στην προβολή σχεδίασης, προσθέστε μια ετικέτα, αλλάξτε το Κείμενο σε "Φόρτωση …" (χωρίς τα εισαγωγικά) Τώρα, μεταβείτε στην προβολή κώδικα κάνοντας κλικ στην καρτέλα Form1.vb. Βρείτε την καταχώριση WebBrowser1_DocumentCompleted και πληκτρολογήστε κάτω από τον κωδικό που τοποθετήσατε εκεί νωρίτερα

Label1. Text = "Τέλος"Τώρα, κάντε κλικ επάνω όπου ο κώδικας λέει DocumentCompleted. Μετακινήστε το ποντίκι σας εκεί που βρίσκονται τα δύο αναπτυσσόμενα πλαίσια. Επιλέξτε το δεύτερο (Αυτό που λέει DocumentCompleted) και επιλέξτε Πλοήγηση. Στη συνέχεια, θα εμφανιστεί κάποιος νέος κώδικας - typ

Label1. Text = "Φόρτωση"Αυτό παρέχει απλώς έναν δείκτη κατά τη φόρτωση της σελίδας. Επίσης, ίσως θελήσετε να ορίσετε την ιδιότητα αγκύρωσης της ετικέτας.

Βήμα 8: Ολοκλήρωση

Ορίστε. Έχετε ένα πλήρως λειτουργικό πρόγραμμα περιήγησης ιστού. Συνεχίστε να το προσαρμόζετε όπως θέλετε. Όπως και στο πρώτο μου διδάξιμο. Έχω μερικές εργασίες για εκείνους που ολοκληρώνουν αυτό το διδακτικό. Εφαρμόστε τα ακόλουθα:

• Λειτουργία σπιτιού
• Αλλάξτε το κουμπί Ανανέωση σε κουμπί Διακοπή κατά τη φόρτωση μιας σελίδας.

Ελπίζω ότι αυτά τα έργα σας έδειξαν πόσο εύκολο είναι να προγραμματίσετε!

Βήμα 9: Λύσεις

Για όσους ολοκλήρωσαν το πρώτο μου VB εκπαιδευτικό - έχω τις λύσεις για την εργασία που έθεσα στο τέλος.

Αλλάξτε το χρώμα φόντου

Αυτό είναι απλό - Αλλάξτε την ιδιότητα BackColour του Form1 σε διαφορετικό χρώμα

Προσθέστε μερικές πληροφορίες πνευματικών δικαιωμάτων

Μια νέα ετικέτα με την αλλαγή της ιδιότητας κειμένου θα κάνει το κόλπο

Κάντε το μέγεθος της φόρμας να αλλάξει με την εικόνα

Αλλάξτε το AutoSize σε True και το AutoSizeMode στο GrowAndShrinkDone! Ακόμα έρχεται: Θα δημιουργήσω μερικά ακόμη VB. NET Instructables. Συνεχίστε την κωδικοποίηση!