Съдържание
Някои приложения просто зареждат, когато се стартират, докато други го правят със стил. Можете да накарате приложението Visual Basic да се открои, като добавите потребителска лента за зареждане в стартовата форма. В инструментариума на Visual Studio няма лента за напредък, но можете да използвате включените компоненти, за да я създадете. Плъзнете някои контроли върху формуляра, коригирайте цветовете си и впечатлите потребителите си с оживен бар, който ще ви посрещне, когато отворите програмата.
инструкции
Цветните ленти за напредък могат да впечатлят потребителите ви (Снимки на полка / снимки на полка / Getty Images)-
Отворете Visual Studio и заредете един от вашите Visual Basic .NET проекти. Отворете "Solution Explorer" със списъка на проектните файлове, ако той вече не е отворен.
-
Намерете в „Solution Explorer“ иконата на стартовата форма на проекта и щракнете двукратно върху нея. Visual Studio ще отвори прозореца за дизайн и ще покаже формата.
-
Отворете кутията с инструменти и плъзнете контрола "GroupBox" вътре, за да го добавите. Върнете се в кутията с инструменти и добавете контрола "ProgressBar" по същия начин.
-
Плъзнете контрола "Етикет" във формуляра. Кликнете върху него и го плъзнете върху добавената лента за напредък. Поставете етикета и лентата подравнени с левия край.
-
Върнете се в кутията с инструменти и плъзнете контрол на таймера, като използвате същата техника. Затворете кутията с инструменти.
Добавете контроли във формуляра
-
Кликнете върху добавения таймер и натиснете "F4", за да отворите прозореца "Свойства". Кликнете върху иконата „Събития“ в горната част на прозореца, за да се покаже списък от събития.
-
Кликнете два пъти върху събитието "Тик". Visual Studio ще отвори прозореца на кода и ще покаже под "Timer1_Tick", който ще се изпълнява с кърлежи часовник.
-
Поставете следния код в тялото на подпрограмата:
loadingBarValue + = увеличение
Ако loadBarValue> 100 Тогава loadingBarValue = 100 Timer1.Stop () GroupBox1.Visible = False End If
ProgressBar1.Value = loadingBarValue
Последното изречение ще накара визуалният индикатор на лентата на напредъка да се придвижи до стойността, съхранена в променливата "LoadBarValue". Стойността на променливата, която е нула при зареждане на формуляра, се увеличава с сума, определена от променливата "increment". Тъй като тази стойност е 1, стойността на "LoadBarValue" ще се увеличи с 1 при всяко изпълнение на подгрупата "Load". Когато лентата достигне максималната стойност (100), таймерът ще спре. Груповото поле, съдържащо лентата за напредък и етикета, ще изчезне автоматично.
-
Натиснете "F7", за да се върнете към изгледа на шаблона и щракнете двукратно върху заглавната лента на формуляра. Visual Studio ще отвори отново прозореца с кода и ще покаже под "Зареждане" на формуляра. Поставете следния код в тази под:
loadingBarValue = 0 Timer1.Interval = 200 инкремент = 1
GroupBox1.Text = "" Label1.Text = "Зареждане" Label1.BackColor = Цвят.Прозрачен Label1.ForeColor = Цвят.
Timer1.Start ()
Първото изречение инициализира "LoadingBarValue" до нула. Вторият определя броя на милисекунди, който таймерът ще изчака между кликванията; в нашия пример стойността ще бъде 200. Увеличаването на този брой ще доведе до забавяне на анимацията. Променливата "инкремент", със стойност 1 в примера, определя колко бързо трябва да се движи лентата на напредъка с всеки тик на таймера. Можете да промените думата "Зареждане" на друга дума, която искате. Следващите два реда контролират цветовете на преден план и фон и можете да ги промените или да ги оставите като "Прозрачни" и "Зелени". Последното изречение започва таймера.
-
Придвижете се до горната част на прозореца с кода и намерете декларацията "Клас". Поставете тези две изречения под него:
Dim loadingBarValue инкремент на Dim
Това ще определи променливите "loadingBarValue" и "increment", описани по-горе.
-
Натиснете "F5", за да стартирате проекта. Ще се появи лентата за напредък, която прилича на лента за зареждане. Етикетът с установения текст ще се появи над лентата. След това анимираната зелена лента ще се движи от ляво на дясно, докато достигне края на лентата за напредък. Когато това се случи, лентата и етикетът ще изчезнат.
Добавете логика за програмиране
съвети
- Поставете лентата и етикета навсякъде във формуляра, като плъзнете контрола "групова кутия". Тъй като етикетът и лентата за напредък са в него, те ще бъдат третирани като единица, което ще направи настаняването по-лесно. Можете също да експериментирате с различни цветове, като промените стойностите на преден план и фон. По подразбиране зеленият цвят в примера ще доведе до хармоничен визуален ефект, тъй като ще съответства на цвета на анимираната лента, която ще се показва по време на зареждането на приложението ви.