VB.net - Классы
В этой статье мы поговорим про классы и их использование в языке программирования VB.net.
Одна из причин, по которой мы должны использовать классы является так называемое "повторное использование кода". Напомним, что в любом классе имеется хотя бы одна функция. Такие функции называются также "методами" или "членами" класса. Используя в свой работе тот или иной класс, мы делаем это потому, что нам нужны те или иные функции этого класса.
Но обо всем по порядку.
Для начала мы создадим новый класс.
Класс люди- он создается следующем образом
В этом классе есть 2 переменные - колво лет и имя. А вот реализации может и не быть.
Простое использование класса.
Public Class men
Public goda As Integer 'колво лет
Public names As String 'имя
Public Sub M()
' Реализация, может быть пустой
End Sub
End Class
'1 простое использование класса
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim man1 As New men
man1.goda = 16
man1.names = "Первый"
MsgBox(man1.names + " " + Str(man1.goda))
End Sub
Такой вариант удобно использовать, когда у нас много однотипных переменных, например список людей.
Но чаще, для сокращения кода, используют процедуры или функции классов.
Дополним класс люди подпрограммой вывода сообщения
' класс люди (men)
Public Class men
Public goda As Integer 'колво лет
Public names As String 'имя
Public Sub M()
' записываем процедуру в объявлении нашего класса
MsgBox(names + " " + Str(goda))
End Sub
End Class
'2 использование подпрограмм
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim man1 As New men
Dim man2 As New men
man1.goda = 16
man2.goda = 18
man1.names = "Первый"
man2.names = "Второй"
'выполняем процедуру с каждым человеком
man1.M()
man2.M()
End Sub
В данном примере строку вызова меседжбокса
MsgBox(names + " " + Str(goda))
мы заменили на
man1.M()
Если же процедура будет состоять из большего количества строк, то код станет намного короче с использованием класса. Так же, внося изменения в подпрограмму, мы это делаем только в одном месте. тем самым избегая ошибок.
В классах чаще используют не подпрограммы, а функции. Давайте рассмотрим пример нахождения площади и периметра квадрата, с использованием класса.
Создаем класс SandP, те площадь и периметр . В свойствах только 1 переменная - размер стороны квадрата. Первая функция - нахождение площади, вторая - периметра квадрата.
'3 класс - нахождение площади и периметра квадрата
Public Class SandP
Public a As Double
Public Function S() As Double
Dim s_ As Double
s_ = a * a
Return s_
End Function
Public Function P() As Double
Dim p_ As Double
p_ = a * 4
Return p_
End Function
End Class
'3 использование функций
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
'создаем новый экземпляр класса - квадрат
Dim kvadrat As New SandP
'задаем переменные для площ и пер
Dim Sa, Pa As Double
'Определяем размер стороны квадрата
kvadrat.a = 10
'находим площадь квадрата, как функцию класса СандП
Sa = kvadrat.S
'подобным образом находим его периметр
Pa = kvadrat.P
'результат вычислений выводим в меседжбокс
MsgBox("S = " + Str(Sa) + vbCrLf + "P = " + Str(Pa))
End Sub
Это самые простые варианты использования классов. И, возможно, из-за простоты не видно то, на сколько упрощается конечный код, при использовании классов.
По этому в следующих уроках я продемонстрирую возможности классов на примере небольших программ.
Смотреть видео
В начало
|