Создание браузера с вкладками. Как осуществить закрытие определенной вкладки - Visual Basic .NET
Формулировка задачи:
Хочу создать свой браузер для личного использования.
Планируемые функции:
Теперь вопросы:
- Вперёд [Сделано]
- Назад [Сделано]
- Обновить [Сделано]
- Остановить [Сделано]
- Домашняя страница [Сделано]
- Перейти [Сделано]
- Поиск [Сделано]
- Просмотр исходного кода [Сделано]
- Добавление и удаление вкладок [Сделано только добавление]
Листинг программы
- Dim i As Integer = 1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim browse As New WebBrowser
- TabControl1.TabPages.Add(i, "" & i)
- TabControl1.SelectTab(i - 1)
- browse.Name = ""
- browse.Dock = DockStyle.Fill
- TabControl1.SelectedTab.Controls.Add(browse)
- i = i + 1
- End Sub
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim browse As New WebBrowser
- TabControl1.TabPages.Add(i, "" & i)
- TabControl1.SelectTab(i - 1)
- browse.Name = ""
- browse.Dock = DockStyle.Fill
- TabControl1.SelectedTab.Controls.Add(browse)
- i = i + 1
- End Sub
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
- CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(TextBox1.Text)
- End Sub
- Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
- CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoBack()
- End Sub
- Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
- CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoForward()
- End Sub
- Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
- CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Refresh()
- End Sub
- Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
- CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Stop()
- End Sub
- Как сделать кнопку удаления вкладки?
- Как сделать что бы в название вкладки отображался сайт на котором ты находишся?
первый вопрос решён:
Листинг программы
- TabControl1.TabPages.Remove(TabControl1.SelectedTab)
Решение задачи: «Создание браузера с вкладками. Как осуществить закрытие определенной вкладки»
textual
Листинг программы
- MyWeb.ExecWB(63, 2, (N), IntPtr.Zero)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д