Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.106
Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.106

Составим очень простую программу, в которой изменим некоторые свойства элемента управления Label. Сначала сделаем это привычным для нас способом. Откроем новый проект и поместим на форме элементы управления Label и Button. Задача программы - при щелчке по кнопке Button изменять размеры надписи Label, цвет фона, текст и месторасположение.

Private Sub Buttonl_Click(ByVal sender As System.Object,_ ByVal e As System.EventArgs) Handles Buttonl.Click

Dim hg As Integer = Label 1 .Height

Dim col As Color = Label 1 .BackColor

ГЛАВА 20 Т ООП (практика)

Dim txt As String = "надпись" Dim If As Integer = Labell.Left Labell.Height = hg + 10 Labell.BackColor = col.Green Labell. Text = txt Labell.Left = If + 10 End Sub

Итак, с каждым щелчком кнопки надпись смещается по горизонтали на десять пикселов, соответственно увеличивается ее ширина, цвет фона меняется на зеленый, текст Labell меняется на надпись. Конечно эту программу можно было бы сделать и проще, но в данном варианте ее будет удобнее сравнивать с такой же, созданной с применением методов объектно-ориентированного программирования. Попробуем создать такую программу.

Объявление класса

Класс является основополагающим элементом программирования на Visual Basic .NET. В этой книге мы уже делали попытку разобраться в данном понятии. Вспомним, что в состав класса входят свойства и методы их обработки. С помощью него создаются объекты и определяются их действия. Ранее, составляя программы, мы определяли класс в модуле формы. Откройте любой имеющийся у вас проект и взгляните на первую строчку кодов. Она выглядит примерно так: Class Forml. Теперь наша задача - создать отдельный файл класса. Можно использовать предыдущий проект, но для этого необходимо отметить знаком комментарий уже имеющиеся коды. Так что будет лучше задействовать новый, чтобы не вносить путаницы в коды. Открыв новый проект, создадим тот же интерфейс, то есть поместим на форме кнопку Button и надпись Label. Затем выполним команду Project > Add Class. В результате откроется диалоговое окно Add New Item, в котором надо выбрать шаблон Class. В текстовом поле Name желательно ввести имя создаваемого класса. Имя следует выбирать таким образом, чтобы оно напоминало о задачах, стоящих перед этим классом. Дадим нашему классу имя свойства. В противном случае сохранится данное по умолчанию имя Classl. vb. Осталось


⇐ Предыдущая Следующая ⇒
 
 
 
Powered by Exponenta