Membuat Program dalam Visual Basic: Penyemak Imbas Web: 9 Langkah

2024 Pengarang: John Day | [email protected]. Diubah suai terakhir: 2024-01-30 11:13

Instructable ini menerangkan proses membuat aplikasi penyemak imbas web mudah di VB. NETIt direka sebagai ikutan dari VB. NET pertama saya yang Dapat Diajar: Membuat Program Pertama Anda Dalam Visual Basic. Sebaiknya anda membaca terlebih dahulu instruksional itu, kerana instruksional ini mengandaikan anda mempunyai pengetahuan asas mengenai Interface Visual Basic Express Interface, seperti yang tercakup dalam arahan saya yang lain. Walaupun Visual Basic 2005 Express Edition berfungsi dengan baik untuk arahan ini, saya menggunakan Visual Basic 2008 Express Edition, tersedia dari Microsoft

Langkah 1: Buat Projek

Buat Projek Bentuk Windows baru, dan namakannya sebagai Penyemak Imbas Web. Ubah saiz borang mengikut keinginan anda.

Langkah 2: Tambahkan Kawalan, dan Tukar Properties

Dari kotak alat, seret TextBox, WebBrowser dan A Button ke borang. Letakkan mereka seperti dalam gambar. Kemudian, edit harta Anchor dari TextBox dan WebBrowser sehingga semua kotak di sekitar kotak kelabu (ditunjukkan ketika anda mengedit anchor properti) dipilih, ini akan membolehkan kawalan untuk 'meregangkan' ketika bentuknya diubah ukurannya. Lakukan perkara yang sama untuk Butang, tetapi hanya tetapkan ke "Atas, Kanan". Juga ubah harta Teks Form1 ke Penyemak Imbas Web, atau sesuatu yang serupa dengan mengubah bar tajuk.

Langkah 3: Kod

Klik dua kali pada Butang1, dan tambahkan kod berikut ke editor, selepas baris "Sub Pribadi" dan sebelum Baris "End Sub"

WebBrowser1. Navigate (TextBox1. Teks)Kod ini hanya memberitahu program: Apabila seseorang mengklik Butang1, Dapatkan WebBrowser untuk Menavigasi ke apa sahaja yang ada di TextBox1 Itu sahaja! Anda mempunyai penyemak imbas web yang berfungsi. Klik butang main untuk mengujinya.

Langkah 4: Lebih Banyak Bahan

Sekarang, anda tidak fikir saya hanya akan memberi anda satu baris kod - adakah anda? Selama beberapa langkah seterusnya, kami akan melaksanakan perkara berikut:

• Bar alamat yang berubah semasa halaman berubah
• Butang kembali, maju dan muat semula
• Bar status.

Langkah 5: Bar Alamat

Pada masa ini, semua bar alamat keluar menunjukkan halaman yang anda taipkan, jika anda mengklik pada pautan, perubahan tersebut tidak tercermin di bar alamat. Untuk memperbaikinya, kita perlu menambahkan beberapa kod lagi. Kembali ke paparan reka bentuk, klik pada "Form 1.vb (Design)" dan kemudian klik dua kali pada kawalan WebBrowser. Ini akan beralih kembali ke paparan kod, namun akan ada beberapa kod lagi di sana, perhatikan bahawa ia mengatakan "WebBrowser1_DocumentCompleted", ini adalah kod yang kami mahukan, jadi kami tidak perlu membuat perubahan di sini, tetapi ada kosong garis di bawahnya, sebelum pernyataan End Sub, dan kami ingin menambahkan beberapa kod di sana. Taipkan perkara berikut di sana

TextBox1. Text = WebBrowser1. Url. ToStringIni memberitahu program bahawa setelah WebBrowser1_Document Selesai, kita harus mengubah TextBox1. Teks ke WebBrowser1. Url. ToString ada kerana, secara lalai, sifat URL penyemak imbas web bukan jenis data (rentetan) yang sama, seperti yang diperlukan oleh kotak teks kami. ToString menulis URL ke rentetan untuk TextBox.

Langkah 6: Butang Tindakan

Kembali ke paparan reka bentuk dan seret 3 butang baru ke borang dan letakkan. Tukar harta teks masing-masing: Button2 = Back, Button3 = Forward dan Button4 = Refresh. Sekiranya anda meletakkannya seperti milik saya, sesuaikan sifat jangkar Refresh ke Atas, Klik kananDua pada butang Kembali, dan taipkan kod berikut.

WebBrowser1. GoBack () Kembali ke reka bentuk, klik dua kali Teruskan dan taip

WebBrowser1. GoForward ()Paparan reka bentuk, dan klik dua kali untuk Segarkan

WebBrowser1. Refresh ()Uji penyemak imbas, dan cuba ciri baru.

Langkah 7: Bar Status

Kembali dalam paparan reka bentuk, tambahkan label, ubah Teks menjadi "Memuat …" (tanpa tanda petik) Sekarang, masuk ke paparan kod dengan mengklik tab Form1.vb. Cari entri WebBrowser1_Document Selesai dan taip di bawah kod yang anda letakkan di sana lebih awal

Label1. Teks = "Selesai"Sekarang, klik di mana kod mengatakan DocumentCompleted. Gerakkan tetikus anda ke tempat dua kotak Turun turun. Pilih yang kedua (Yang mengatakan DocumentCompleted) dan pilih Navigasi. Kemudian, beberapa kod baru akan muncul - taip

Label1. Teks = "Memuatkan"Ini hanya memberikan petunjuk semasa halaman dimuat. Juga, anda mungkin ingin menetapkan sifat penanda label.

Langkah 8: Selesai

Itupun dia. Anda mempunyai penyemak imbas web yang berfungsi sepenuhnya. Terus menyesuaikannya seperti yang anda mahukan. Seperti dalam arahan pertama saya. Saya mempunyai beberapa kerja rumah bagi mereka yang menyelesaikan arahan ini. Laksanakan perkara berikut:

• Fungsi rumah
• Tukar butang Segarkan ke butang Berhenti ketika halaman dimuat.

Saya harap projek-projek ini menunjukkan betapa mudahnya program ini!

Langkah 9: Penyelesaian

Bagi mereka yang menyelesaikan instruksi VB pertama saya - saya ada penyelesaian untuk kerja rumah yang saya tetapkan pada akhir.

Tukar warna latar belakang

Ini mudah - Tukar sifat BackColour dari Form1 ke warna yang berbeza

Tambahkan beberapa maklumat hak cipta

Label baru dengan harta teks yang diubah akan berjaya

Buat ukuran bentuk berubah dengan Gambar

Tukar AutoSize ke True dan AutoSizeMode ke GrowAndShrinkDone! Masih akan datang: Saya akan membuat beberapa Instruksional VB. NET lagi. Terus Pengekodan!