Отправляет email-рассылки с помощью сервиса Sendsay

Visual Basic.NET. Уроки

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 6.040 RSS
←   Июнь 2002   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Сайт рассылки: http://progs.biz
Открыта: 17-03-2002

Автор
Алексеев Игорь

Статистика

6.040 подписчиков
0 за неделю
←   Все выпуски   →

Visual Basic. Уроки.


Информационный Канал Subscribe.Ru

VB.NET. Программирование для Windows. Уроки с сайта http://progs.biz

Рассылка №3

VB.NET для Windows. Урок 7. Работаем с радиокнопками.
VB.NET для Windows. Урок 8. Элемент TextBox.
Полные версии уроков (с картинками) можно найти по адресам
Урок 7. Работаем с радиокнопками.
Урок 8. Элемент TextBox.

VB.NET для Windows. Урок 7. Работаем с радиокнопками

На этом занятии мы с вами посмотрим, как можно работать с радиокнопками. Создайте новый пустой проект типа Windows Application и расположите на форме пару или тройку элементов RadioButton.

Сейчас мы сделаем следующее - при щелчке на любой из радиокнопок наша форма будет менять цвет. Для изменения цвета при щелчке на первой радиокнопке внесите в заготовку для кода следующий строки:

Private Sub RadioButton1_CheckedChanged(
ByVal sender As System.Object,
ByVal e As System.EventArgs)
Handles RadioButton1.CheckedChanged
    Me.BackColor = System.Drawing.Color.Coral 'Закрашиваем форму
End Sub

Код для обработчиков остальных радиокнопок пишеться аналогично. В качестве цветов можно использовать что-нибудь экзотическое типа DeepPink или MediumSeaGreen.

Из свойств радиокнопок отметим свойство Text (отвечает за надпись рядом с радиокнопкой) и Checked (логического типа, отвечает за выделение радиокнопки). Последнее свойсво можно использовать, например, для программного выбора той или иной радиокнопки:

...
RadioButton1.Checked = True
 ...

Теперь если вы запустите программу то увидите что, во-первых, радиокнопки автоматически образуют группу (т. е. при щелчке на любой из кнопок у ней появляется точка и у остальных радиокнопок точка пропадает) и, во-вторых, при выборе сответствующей радиокнопки наша форма будет менять свой цвет.

Теперь посмотрим, как можно задавать несколько групп радиокнопок. Выбор в таких группах производится независимо. Давайте для примера добавим на форму еще пару радиокнопок, которыми мы сможем задавать тот или иной заголовок для нашего окна. Для того, чтобы новые радиокнопки образовали независимую группу, сначала добавьте на форму элемент GroupeBox.

Теперь перетащите 2 новые радиокнопки с панели элементов на наш GroupeBox. Таким образом две новые радиокнопки окажуться в рамочке, которая выполняет не только декоративную роль, но и образует новую группу элементов. В обработчик для первой новой радиокнопки добавьте следующие строки:

Private Sub RadioButton1_CheckedChanged(
ByVal sender As System.Object,
ByVal e As System.EventArgs)
Handles RadioButton1.CheckedChanged
    Me.Text = "Новый заголовок" 'Задаем заголовок для формы
End Sub

В коде для второй радиокнопки напишите что-нибудь аналогичное.

Теперь при запуске программы мы сможем независимо менять как цвет формы, так и ее заголовок.

Если вы не хотите использовать рамку (GroupeBox), то для создания групп элементов можно использовать элемент Panel.

Используется он аналогично GroupeBox, но не имеет видимой рамки.

Наверх

VB.NET для Windows. Урок 8. Элемент TextBox

Перенесите элемент TextBox на форму.

Он предназначен для ввода текстовой и числовой информации. Его основное свойство - это Text. Оно содержит, естественно, текст, который пользователь (или сама программа) вводит в TextBox. Для того, чтобы задать это свойство во время работы программы, мы должны написать что-то вроде:

...
TextBox1.Text = "Некоторый текст"
 ...

а для чтения данных их TextBox'а

...
k=TextBox1.Text
 ...

Часто при получении TextBox'ом фокуса весь текст в нем выделяется. Делается это следующим образом:

Private Sub TextBox1_Enter(ByVal sender As Object, ByVal e As System.EventArgs)
Handles TextBox1.Enter
    TextBox1.SelectionStart = 0
    TextBox1.SelectionLength = TextBox1.TextLength
End Sub

Здесь мы используем такие свойства TextBox'а как SelectionStart (устанавливает начало выделения, нумерация с нуля), SelectionLength (устанавливает конечную точку выделения, в приведенном примере мы записываем сюда длину текста в нашем TextBox'е). Весь этот код мы пишем в обработчике TextBox1_Enter - он будет выполнятся непосредственно перед получением элементом фокуса. Для выделенного текста в TextBox'е может еще использоваться свойство SelectedText. Оно содержит выделенный пользователем или программой текст.

Для удаления текста применяется метод clear:

...
TextBox1.Clear()
 ...

Еще одно полезное свойсво для TextBox'а - это MultiLine. По умолчанию оно равно false и данные в TextBox можно вводить только в одну строчку. Если установить его в true, то в TextBox можно вводить несколько строк (нажимая Enter). С этим свойством связано свойство WordWrap. Если оно равно true, то длинный текст автоматически переносится на следующую строку, если false, то не переносится.

Как и VB 6 у TextBox'а есть свойство PasswordChar. Если присвоить ему некоторый символ (чаще всего используется *), то он будет замещать все вводимые пользователем символы. При этом программно введенный пользователем пароль (а чаще всего это свойство используется именно для пароля) все равно будет доступен в программе через свойство Text. Свойство PasswordChar не будет приниматься во внимание, если MultiLine равно true. Для пароля (впрочем, не только для него) можно задать максимальную длину:

TextBox1.MaxLength = 8 'Максимальная длина равно 8

Из событий TextBox'а самое важное, по всей видимости - TextChanged. Оно возникает каждый раз при изменении теста в TextBox'е (т. е. при изменении свойства Text). Вот пример использования этого события:

Private Sub TextBox1_TextChanged(ByVal sender As System.Object,
ByVal e As System.EventArgs)
Handles TextBox1.TextChanged
    Me.Text = TextBox1.Text
End Sub

Этот код будет изменять заголовок для формы в соответствии с текстом в TextBox'е.

Наверх

Copyright Алексеев Игорь, 2002

Copyright сайт progs.biz, 2002

http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу
В избранное