Урок за управление на VB.Net TEXTBOX: Свойства с пример

Какво е текстBox Контрол?

ТекстътBox Control ви позволява да въвеждате текст във вашия формуляр по време на изпълнение. Настройката по подразбиране е, че ще приема само един ред текст, но можете да го промените, за да приема няколко реда. Можете дори да включите ленти за превъртане във вашия текстBox Control.

ТекстBox Имоти

Следните са най-често срещаните свойства на Visual Basic TextBox контрол на:

• TextAlign– за настройка на подравняване на текста
• Ленти за превъртане– за добавяне на ленти за превъртане, както вертикални, така и хоризонтални
• Многоредов– за задаване на текстBox Контрол за разрешаване на множество редове
• Максимална дължина– за указване на максималния брой символи ТекстBox Контролът ще приеме
• индекс– за указване на индекса на контролния масив
• Enabled– за активиране на контролата на текстовото поле
• Само за четене– ако е зададено на true, ще можете да използвате текстаBox Контрол, ако е зададено на „false“, няма да можете да използвате текстаBox Control.
• SelectionStart– за задаване или получаване на начална точка за текстаBox Control.
• SelectionLength– за настройка или получаване на броя знаци, които са избрани в текстаBox Control.
• Избран текст– връща ТекстаBox Контрол, който е избран в момента.

ТекстBox Събития

Целта на събитията е да направят текстаBox Контролът отговаря на действията на потребителя като щракване, двойно щракване или промяна в подравняването на текста. Ето общите събития за ТекстаBox контрол:

• AutoSizeChanged– Задейства се от промяна в свойството AutoSize.
• ReadOnlyChanged– Задейства се от промяна на стойността на свойството ReadOnly.
• Кликнете– Задейства се от щракване върху текстаBox Control.

Как да създадете текстBox

Следвайте тези стъпки, за да добавите първия си текстBox контрол към Windows Формирайте и покажете поздравително съобщение по време на изпълнение.

Стъпка 1) За да създадете текстBox, плъзнете текстаBox контрол от кутията с инструменти в Windows Форма:

Стъпка 2)

1. Щракнете върху ТекстаBox Контрол, който сте добавили към формуляра.
2. Преминете към раздела Свойства, разположен в долния ляв ъгъл на екрана. Променете името на текстовото поле от ТекстBox1 към HelloTextBox:

Стъпка 3) Добавете следния код, за да добавите текст към контролата:

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'Add text to the control
         HelloTextBox.Text = "Hello. Welcome to Guru99!"
  End Sub

Стъпка 4) Вече можете да стартирате кода, като щракнете върху бутона Старт, разположен в горната лента:

Стъпка 5) Трябва да получите следния формуляр:

Ето екранна снимка на пълния код за горното:

Обяснение на кода:

1. Създаване на публичен клас с име Form1.
2. Създаване на подпроцедура с име Form1_Load. Ще бъде извикан, когато формулярът се зареди.
3. Коментар. Компилаторът на VB.Net ще пропусне това.
4. Край на подпроцедурата.
5. Край на часа.

Свойство PasswordChar

Понякога искате текстово поле да се използва за typing парола. Това означава, че каквото и да се въведе в това текстово поле, трябва да остане поверително. Това е възможно с VB.Net. Може да се направи с помощта на PasswordChar свойство, което ни позволява да използваме всеки символ, който искате. Нека демонстрираме това с пример:

Започнете със създаване на нов проект. Плъзнете два текстаBox Контроли, два етикета и един бутон във формуляра. Променете текстовете на двата етикета и бутона на следното:

Щракнете върху текстовото поле до етикета с потребителско име, преминете към раздела Свойства, разположен в долния ляв ъгъл на прозореца. Дайте му име UsernameField.

Направете същото за текстаBox Контролирайте до етикета за парола, давайки му името PasswordField.

Сега трябва да направите TextField PasswordBox Контролното показване * за всеки въведен знак в него. Добавете следния код:

Private Sub PasswordField_TextChanged(sender As Object, e As EventArgs) Handles PasswordField.TextChanged
       PasswordField.PasswordChar = "*"
End Sub

Сега стартирайте кода, като щракнете върху бутона Старт. Ще се появи формуляр.

Въведете потребителското име и паролата и вижте какво се случва. Трябва да видите следното:

Потребителското име се показва, но паролата е скрита. Ето кода за горното:

Обяснение на кода:

1. Създаване на клас с име Form1.
2. Създаване на подпроцедура с име PasswordField_TextChanged(). Тя ще бъде извикана при зареждане на формуляра.
3. Използване на свойството PasswordChar за показване на * като потребител въвежда паролата.
4. Приключване на подпроцедурата.
5. Край на часа.

Нов ред в текстаBox

По подразбиране можете да създадете само един ред текст в текстово поле. Има два начина, чрез които можем да постигнем това. Нека ги обсъдим.

Плъзнете и пуснете текстBox Контрол към вашата форма. Дайте име на контрола GuruДобре дошли.

Щракнете отново върху контролата на текстовото поле и преместете курсора на мишката до секцията Свойства. Променете стойността на свойството Multiline на True.

Като алтернатива, можете да зададете свойството Multiline на true във вашия код, както следва:

GuruДобре дошли.Многоредов = Вярно

Добавете следния код:

 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        GuruWelcome.Multiline = True

        GuruWelcome.Text = "Line 1"

        GuruWelcome.Text = GuruWelcome.Text & ControlChars.NewLine & "Line 2"

    End Sub

При изпълнение двата реда текст ще бъдат разделени.

Обяснение на Code:

1. Създаване на клас с име Form1.
2. Създаване на подпрограма с име Form1_Load().
3. Задаване на свойството Multiline на True. Текстовото поле ще може да побере повече от един ред.
4. Добавяне на първия ред текст към текстовото поле.
5. Добавяне на втория ред текст към текстовото поле. Свойството ControlChars.NewLine ни помага да разделим двата реда.
6. Край на подпрограмата.
7. Край на часа.

Извличане на цели числа

VB.Net третира всичко като низ. Това означава, че четете цяло число от текстовото поле като низ, след което го преобразувате в цяло число. Това обикновено се прави с помощта на метода Integer.Parse().

За да демонстрирате това, създайте нова контрола на текстово поле плюс бутон. Дайте на текстовото поле името възраст. Дайте на бутона име Button1. Трябва да имате следния интерфейс:

Добавете следния код:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim x As Integer
        x = Integer.Parse(age.Text)
        MessageBox.Show(x)

Стартирайте кода и въведете възрастта си в текстовото поле. Щракнете върху бутона Показване на възрастта. Трябва да видите следното:

Стойността, която въвеждате, се връща в съобщениеBox.

Обяснение на Code:

1. Създаване на клас с име Form1.
2. Създаване на подпроцедура с име Button1_Click. Той ще бъде извикан, когато се щракне върху бутона.
3. Дефиниране на целочислена променлива с име x.
4. Преобразуване на стойността, прочетена от текстовото поле с име възраст, в цяло число.
5. Показване на преобразуваната в горната стъпка стойност в съобщениеBox.
6. Приключване на подпроцедурата.

Текст само за четенеBox

Можете да направите текстово поле само за четене. Това означава, че потребителят няма да може да променя стойността, показана в текстовото поле. За да направите това, задайте свойството ReadOnly на True. За да демонстрирате това, създайте ново текстово поле и му дайте името guru99. Добавете следния код:

Private Sub guru99_TextChanged(sender As Object, e As EventArgs) Handles guru99.TextChanged

        guru99.Text = "welcome to Guru99"

        guru99.ReadOnly = True

    End Sub

Кодът трябва да върне следното:

Ето кода:

Обяснение на Code:

1. Създаване на клас с име Form1.
2. Създаване на подпрограма с име guru99_TextChanged.
3. Добавяне на текст към текстовото поле с име guru99.
4. Задаване на свойството ReadOnly на текстовото поле на True. Това прави текста в текстовото поле непроменяем.
5. Приключване на подпроцедурата.
6. Край на часа.

Свойство MaxLength

Свойството MaxLength може да ви помогне да зададете максималния брой думи или знаци, които текстовото поле ще позволи. За да демонстрирате това, създайте текстBox контрол и му дайте името fullName. Добавете следния код:

Private Sub fullName_TextChanged(sender As Object, e As EventArgs) Handles fullName.TextChanged

        fullName.MaxLength = 8

    End Sub

Стартирайте кода и се опитайте да въведете пълното си име. Няма да можете да въвеждате повече от 8 знака, включително интервали:

Кодът:

Code Обяснение:

1. Създаване на клас с име Form1.
2. Създаване на подпроцедура с име fullName_TextChanged.
3. Направете текстовото поле пълно име да приема максимум само 8 знака.
4. Приключване на подпроцедурата.
5. Край на часа.

Въпроси и Отговори