Създаване на програма във Visual Basic: Уеб браузър: 9 стъпки

2024 Автор: John Day | [email protected]. Последно модифициран: 2024-01-30 07:55

Този Instructable обяснява процеса на създаване на просто приложение за уеб браузър във VB. NET Той е проектиран като продължение на първия ми VB. NET Instructable: Създаване на първата ви програма във Visual Basic. Препоръчва се първо да прочетете тази инструкция, тъй като тази инструкция предполага, че имате основни познания за интерфейса на Visual Basic Express Edition, както е описано в другите ми инструкции. Въпреки че Visual Basic 2005 Express Edition работи добре за тази инструкция, аз използвам Visual Basic 2008 Express Edition, достъпно от Microsoft

Стъпка 1: Създайте проекта

Създайте нов проект за Windows Forms и го наречете уеб браузър. Преоразмерете формата по ваш вкус.

Стъпка 2: Добавете контролите и променете свойствата

От кутията с инструменти плъзнете TextBox, WebBrowser и A бутон върху формуляра. Поставете ги така, както са на снимката. След това редактирайте свойството Anchor на TextBox и WebBrowser, така че всички полета около сивия квадрат (показани, когато редактирате свойството на котвата) да бъдат избрани, това ще позволи на контролите да се „разтягат“, когато формата се преоразмерява. Направете същото за бутона, но го задайте само на "горе, надясно". Също така променете свойството Text на Form1 на уеб браузър или нещо подобно, за да промените заглавната лента.

Стъпка 3: Кодирайте

Щракнете двукратно върху Button1 и добавете следния код към редактора след реда "Private Sub" и преди реда "End Sub"

WebBrowser1. Navigate (TextBox1. Text)Този код просто казва на програмата: Когато някой кликне върху Button1, Вземете 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 = Назад, Button3 = Напред и Button4 = Опресняване. Ако ги позиционирате като моите, коригирайте котвата на Refresh до Top, Щракнете с десния бутон върху бутона Back и въведете следния код.

WebBrowser 1. GoBack () Назад към дизайна, щракнете двукратно напред и напишете

WebBrowser 1. GoForward ()Дизайн изглед и двойно щракване за опресняване

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

Стъпка 7: Лента на състоянието

Върнете се в изгледа за проектиране, добавете етикет, променете текста на „Зареждане …“(без кавичките) Сега отидете в кодовия изглед, като щракнете върху раздела Form1.vb. Намерете записа WebBrowser1_DocumentCompleted и въведете под кода, който сте поставили там по -рано

Label1. Text = "Готово"Сега щракнете нагоре, където кодът казва DocumentCompleted. Преместете мишката нагоре до мястото, където са двете падащи полета. Изберете втория (Този, който казва DocumentCompleted) и изберете Навигация. След това ще се появи някакъв нов код - въведете

Label1. Text = "Зареждане"Това просто дава индикатор, когато страницата се зарежда. Също така може да искате да зададете свойството на котвата на етикета.

Стъпка 8: Съвършен

Ето. Имате напълно работещ уеб браузър. Продължавайте да го персонализирате, както желаете. Както в първата ми инструкция. Имам домашна работа за тези, които изпълняват тази инструкция. Приложете следното:

• Домашна функция
• Променете бутона „Опресняване“на „Стоп“, когато се зарежда страница.

Надявам се, че тези проекти са ви показали колко лесно е да се програмира!

Стъпка 9: Решения

За тези, които завършиха първата ми инструкция за VB - имам решенията за домашните, които зададох в края.

Променете цвета на фона

Това е просто - Променете свойството BackColour на Form1 на различен цвят

Добавете информация за авторските права

Нов етикет с променено свойство текст ще свърши работа

Направете промяна на размера на формуляра с изображение

Променете AutoSize на True и AutoSizeMode на GrowAndShrinkDone! Тепърва предстои: Ще създам още VB. NET инструкции. Продължавайте да кодирате!