Создание программы в Visual Basic: веб-браузер: 9 шагов

2024 Автор: John Day | [email protected]. Последнее изменение: 2024-01-30 11:54

В этом руководстве объясняется процесс создания простого приложения веб-браузера на VB. NET. Он разработан как продолжение моего первого руководства по VB. NET: создание вашей первой программы на Visual Basic. Рекомендуется сначала прочитать это руководство, так как оно предполагает, что у вас есть базовые знания об интерфейсе Visual Basic Express Edition, как описано в другом моем руководстве. Хотя Visual Basic 2005 Express Edition отлично подходит для этого руководства, я использую Visual Basic 2008 Express Edition, доступный от Microsoft

Шаг 1. Создайте проект

Создайте новый проект Windows Forms и назовите его Web Browser. Измените размер формы по своему вкусу.

Шаг 2. Добавьте элементы управления и измените свойства

Из панели инструментов перетащите TextBox, WebBrowser и кнопку на форму. Разместите их, как на картинке. Затем отредактируйте свойство Anchor TextBox и WebBrowser так, чтобы были выбраны все поля вокруг серого квадрата (показанного при редактировании свойства привязки), это позволит элементам управления «растягиваться» при изменении размера формы. Сделайте то же самое для кнопки, но только установите для нее значение «Вверху, справа». Также измените свойство Text Form1 на Web Browser или что-то подобное, чтобы изменить строку заголовка.

Шаг 3: Код

Дважды щелкните кнопку Button1 и добавьте следующий код в редактор после строки «Private Sub» и перед строкой «End Sub».

WebBrowser1. Navigate (TextBox1. Text)Этот код просто сообщает программе: когда кто-то нажимает кнопку Button1, Get WebBrowser для перехода к содержимому TextBox1 Вот и все! У вас есть работающий веб-браузер. Нажмите кнопку воспроизведения, чтобы проверить это.

Шаг 4: больше вещей

Вы же не думали, что я просто дам вам одну строчку кода - не так ли? В течение следующих нескольких шагов мы реализуем следующее:

• Адресная строка, которая меняется при изменении страницы
• Кнопки Назад, Вперед и Обновить
• Статус бар.

Шаг 5: адресная строка

На данный момент вся наша адресная строка показывает страницу, которую вы вводите, если вы нажимаете на ссылку, изменение не отражается в адресной строке. Чтобы исправить это, нам нужно добавить еще код. Вернитесь в представление дизайна, щелкните «Форма 1.vb (Дизайн)», а затем дважды щелкните элемент управления WebBrowser. Он вернется в режим просмотра кода, однако там будет еще код, обратите внимание, что он говорит "WebBrowser1_DocumentCompleted", это тот код, который нам нужен, поэтому нам не нужно вносить здесь никаких изменений, но есть пустое поле под этим, перед оператором End Sub, и мы хотим добавить туда некоторый код. Введите туда следующее

TextBox1. Text = WebBrowser1. Url. ToStringЭто сообщает программе, что после завершения WebBrowser1_DocumentCompleted мы должны изменить TextBox1. Text на WebBrowser1. Url. ToString существует, потому что по умолчанию свойство URL-адреса веб-браузера не имеет того же типа данных (строки), который требуется для нашего текстового поля. ToString записывает URL-адрес в строку для TextBox.

Шаг 6: кнопки действий

Вернитесь в режим просмотра дизайна, перетащите 3 новые кнопки на форму и разместите их. Измените свойство Text для каждого: Button2 = Back, Button3 = Forward и Button4 = Refresh. Если вы разместите их, как мои, настройте свойство привязки Обновить вверх, дважды щелкните правой кнопкой мыши кнопку «Назад» и введите следующий код.

WebBrowser1. GoBack () Вернитесь к дизайну, дважды щелкните «Вперед» и введите

WebBrowser1. GoForward ()Представление «Дизайн» и двойной щелчок для обновления

WebBrowser1. Refresh ()Протестируйте браузер и попробуйте новые функции.

Шаг 7: строка состояния

Вернитесь в представление дизайна, добавьте метку, измените текст на «Загрузка…» (без кавычек). Теперь перейдите в представление кода, щелкнув вкладку Form1.vb. Найдите запись WebBrowser1_DocumentCompleted и введите ниже код, который вы разместили там ранее.

Label1. Text = "Готово"Теперь щелкните вверх там, где в коде написано DocumentCompleted. Переместите указатель мыши вверх туда, где находятся два раскрывающихся списка. Выберите второй (тот, который говорит DocumentCompleted) и выберите Navigating. Затем появится новый код - наберите

Label1. Text = "Загрузка"Это просто индикатор загрузки страницы. Кроме того, вы можете установить свойство привязки метки.

Шаг 8: Готово

Вот и все. У вас есть полнофункциональный веб-браузер. Продолжайте настраивать его по своему усмотрению, как в моем первом руководстве. У меня есть домашнее задание для тех, кто выполнил это руководство. Выполните следующее:

• Домашняя функция
• Измените кнопку «Обновить» на кнопку «Стоп» при загрузке страницы.

Надеюсь, эти проекты показали вам, насколько легко программировать!

Шаг 9: Решения

Для тех, кто завершил мой первый инструктаж по VB - у меня есть решения для домашней работы, которые я поставил в конце.

Измените цвет фона

Это просто - измените свойство BackColour формы Form1 на другой цвет.

Добавьте информацию об авторских правах

Новая метка с измененным свойством текста сделает свое дело

Сделайте изменение размера формы с помощью изображения

Измените AutoSize на True и AutoSizeMode на GrowAndShrinkDone! Еще впереди: я буду создавать еще несколько инструкций VB. NET. Продолжайте кодировать!