Visual Basic'te Program Oluşturma: Web Tarayıcı: 9 Adım

2024 Yazar: John Day | [email protected]. Son düzenleme: 2024-01-30 13:22

Bu Eğitilebilir Tablo, VB. NET'te basit bir web tarayıcı uygulaması oluşturma sürecini açıklar. İlk VB. NET Eğitilebilir Dosyamın bir takibi olarak tasarlanmıştır: Visual Basic'te İlk Programınızı Oluşturma. İlk önce bu talimatı okumanız önerilir, çünkü bu talimat, diğer talimatımda kapsanan Visual Basic Express Edition Arayüzü hakkında temel bir bilgiye sahip olduğunuzu varsaymaktadır. Visual Basic 2005 Express Edition bu talimat için iyi çalışsa da, kullanıyorum Microsoft'tan edinilebilen Visual Basic 2008 Express Edition

Adım 1: Projeyi Oluşturun

Yeni bir Windows Forms Projesi oluşturun ve buna Web Tarayıcısı adını verin. Formu beğeninize göre yeniden boyutlandırın.

Adım 2: Kontrolleri Ekleyin ve Özellikleri Değiştirin

Araç kutusundan bir TextBox, WebBrowser ve A Button forma sürükleyin. Onları resimdeki gibi yerleştirin. Ardından, TextBox ve WebBrowser'ın Anchor özelliğini, gri karenin etrafındaki tüm kutular (bağlantı özelliğini düzenlediğinizde gösterilir) seçilecek şekilde düzenleyin; bu, form yeniden boyutlandırıldığında denetimlerin 'uzamasına' olanak tanır. Aynısını Düğme için yapın, ancak bunu yalnızca "Üst, Sağ" olarak ayarlayın. Ayrıca Form1'in Metin özelliğini Web Tarayıcısı veya başlık çubuğunu değiştirmek için benzer bir şey olarak değiştirin.

Adım 3: Kodlayın

Button1'e çift tıklayın ve "Private Sub" satırından sonra ve "End Sub" satırından önce editöre aşağıdaki kodu ekleyin

WebBrowser1. Navigate(TextBox1. Text)Bu kod programa basitçe şunu söyler: Birisi Button1'e tıkladığında, WebBrowser'ı TextBox1'de ne varsa Gezinsin İşte Bu kadar! Çalışan bir web tarayıcınız var. Test etmek için oynat düğmesini tıklayın.

4. Adım: Daha Fazla Şey

Şimdi, size sadece bir satır kod vereceğimi düşünmediniz, değil mi? Sonraki birkaç adımda aşağıdakileri uygulayacağız:

• Sayfa değiştikçe değişen adres çubuğu
• Geri, ileri ve yenileme düğmeleri
• Durum çubuğu.

Adım 5: Adres Çubuğu

Şu anda adres çubuğu yazdığınız sayfayı gösteriyor, bir bağlantıya tıklarsanız değişiklik adres çubuğuna yansımaz. Bunu düzeltmek için biraz daha kod eklememiz gerekiyor. Tasarım görünümüne geri dönün, "Form 1.vb (Tasarım)" üzerine tıklayın ve ardından WebBrowser kontrolüne çift tıklayın. Kod görünümüne geri dönecek, ancak orada biraz daha kod olacak, "WebBrowser1_DocumentCompleted" yazdığına dikkat edin, istediğimiz kod bu, yani burada herhangi bir değişiklik yapmamıza gerek yok, ancak boşluk var bunun altındaki satır, End Sub deyiminden önce ve oraya bir kod eklemek istiyoruz. oraya şunu yazın

TextBox1. Text = WebBrowser1. Url. ToStringBu, programa WebBrowser1_DocumentCompleted, TextBox1. Text 'i WebBrowser1. Url olarak değiştirmemiz gerektiğini söyler. ToString oradadır, çünkü varsayılan olarak, web tarayıcısının URL özelliği, metin kutumuzun ihtiyaç duyduğu veri türü (dize) ile aynı değildir. ToString, URL'yi TextBox için bir dizeye yazar.

Adım 6: Eylem Düğmeleri

Tasarım görünümüne geri dönün ve 3 yeni düğmeyi forma sürükleyin ve konumlandırın. Her birinin Text özelliğini değiştirin: Button2 = Back, Button3 = Forward ve Button4 = Yenile. Bunları benimki gibi konumlandırırsanız, Refresh to Top'un çapa özelliğini ayarlayın, Geri düğmesine Sağ Çift tıklayın ve aşağıdaki kodu yazın.

WebBrowser1. GoBack() Tasarıma geri dönün, İleri'ye çift tıklayın ve yazın

WebBrowser1. GoForward()Tasarım görünümü ve Yenilemek için çift tıklama

WebBrowser1. Yenile()Tarayıcıyı test edin ve yeni özellikleri deneyin.

7. Adım: Durum Çubuğu

Tasarım görünümüne geri dönün, bir etiket ekleyin, Metni "Yükleniyor…" olarak değiştirin (tırnak işaretleri olmadan) Şimdi, Form1.vb sekmesine tıklayarak kod görünümüne gidin. WebBrowser1_DocumentCompleted girişini bulun ve oraya daha önce yerleştirdiğiniz kodun altına yazın

Label1. Text = "Bitti"Şimdi, kodun DocumentCompleted yazdığı yere tıklayın. Farenizi iki Açılır kutunun olduğu yere getirin. İkincisini seçin (Belge Tamamlandı yazan) ve Gezinme'yi seçin. Ardından, bazı yeni kodlar görünecektir - yazın

Label1. Text = "Yükleniyor"Bu sadece sayfa yüklenirken bir gösterge sağlar. Ayrıca, etiketin bağlantı özelliğini ayarlamak isteyebilirsiniz.

Adım 8: Tamamlayın

İşte gidiyorsun. Tam olarak çalışan bir web tarayıcınız var. Dilediğiniz gibi özelleştirmeye devam edin. İlk talimatımda olduğu gibi. Bu talimatı tamamlayanlar için bazı ödevlerim var. Aşağıdakileri uygulayın:

• Bir ev işlevi
• Bir sayfa yüklenirken Yenile düğmesini Durdur düğmesi olarak değiştirin.

Umarım bu projeler size programlamanın ne kadar kolay olduğunu göstermiştir!

9. Adım: Çözümler

İlk VB talimatımı tamamlayanlar için - Sonunda belirlediğim ödev için çözümlere sahibim.

Arka plan rengini değiştir

Bu basittir - Form1'in BackColour özelliğini farklı bir renge değiştirin

Biraz telif hakkı bilgisi ekleyin

text özelliği değiştirilmiş yeni bir etiket hile yapacak

Görüntü ile formun boyutunu değiştirmesini sağlayın

AutoSize'ı True olarak ve AutoSizeMode'u GrowAndShrinkDone olarak değiştirin!Hala gelecek: Biraz daha VB. NET Instructables oluşturacağım. Kodlamaya devam edin!