Создание браузера с вкладками. Как осуществить закрытие определенной вкладки - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Хочу создать свой браузер для личного использования. Планируемые функции:
  • Вперёд [Сделано]
  • Назад [Сделано]
  • Обновить [Сделано]
  • Остановить [Сделано]
  • Домашняя страница [Сделано]
  • Перейти [Сделано]
  • Поиск [Сделано]
  • Просмотр исходного кода [Сделано]
  • Добавление и удаление вкладок [Сделано только добавление]
Вот собственно код:
Листинг программы
  1. Dim i As Integer = 1
  2. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3. Dim browse As New WebBrowser
  4. TabControl1.TabPages.Add(i, "" & i)
  5. TabControl1.SelectTab(i - 1)
  6. browse.Name = ""
  7. browse.Dock = DockStyle.Fill
  8. TabControl1.SelectedTab.Controls.Add(browse)
  9. i = i + 1
  10. End Sub
  11. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  12. Dim browse As New WebBrowser
  13. TabControl1.TabPages.Add(i, "" & i)
  14. TabControl1.SelectTab(i - 1)
  15. browse.Name = ""
  16. browse.Dock = DockStyle.Fill
  17. TabControl1.SelectedTab.Controls.Add(browse)
  18. i = i + 1
  19. End Sub
  20. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  21. CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(TextBox1.Text)
  22. End Sub
  23. Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
  24. CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoBack()
  25. End Sub
  26. Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
  27. CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoForward()
  28. End Sub
  29. Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
  30. CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Refresh()
  31. End Sub
  32. Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
  33. CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Stop()
  34. End Sub
Теперь вопросы:
  1. Как сделать кнопку удаления вкладки?
  2. Как сделать что бы в название вкладки отображался сайт на котором ты находишся?
первый вопрос решён:
Листинг программы
  1. TabControl1.TabPages.Remove(TabControl1.SelectedTab)

Решение задачи: «Создание браузера с вкладками. Как осуществить закрытие определенной вкладки»

textual
Листинг программы
  1. MyWeb.ExecWB(63, 2, (N), IntPtr.Zero)

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 4.167 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы