простий браузер

Наша взаимовыгодная связь https://banwar.org/

Ось вирішив для прикладу зробити простенький браузер. Ви можете його вдосконалити. Є тільки всі необхідні функції.

Можете його переробляти під себе. На форму додаємо 5 кнопок:

1. Перейти на сайт
2. оновити сайт
3. зупинити завантаження
4. Повернуться на сторінку назад
5. Повернуться на сторінку вперед

Ну і додаємо WebBorwser, де власне і буде відображатися сайт.

Файл вантажити не буду, а просто викладу код.

Будуть питання, то в коменти.

Впринципі, робити з браузера в СБ великий проект не варто.

Браузерів дуже багато, а так як форма браузера працює на движку Інтернет Екплорера, то чекати нічого хорошого не можна.

Краще використовувати тільки з метою ознайомлення. Ще, для розвитку можна подивитися статтю - " Браузер на WebKit "

Public Class Form1 Private Sub Button1_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click WebBrowser1.Navigate (TextBox1.Text) 'Переходимо на сайт написаний в текстовому полі End Sub Private Sub Button2_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click WebBrowser1.Refresh () 'Оновлюємо сторінку End Sub Private Sub Button3_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click WebBrowser1.Stop () 'Зупиняємо завантаження сторінки End Sub Private Sub Button4_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click WebBrowser1.GoBack ()' Назад End Sub Private Sub Button5_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click WebBrowser1.GoForward () 'Уперед End Sub End Class

Схожі записи: