Среда, 2025-01-22

Professor VB - примеры на VB.net и C#
Меню сайта
Вход на сайт
Категории раздела
Уроки VB.net [25]
VB.net и математика [13]
Random VB [4]
VB.net - разное [7]
VB.net - Примеры программ [2]
Главная » Статьи » VB.net » Уроки VB.net

VB.net - Классы

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


 

  Это самые простые варианты использования классов. И, возможно, из-за простоты не видно то, на сколько упрощается конечный код, при использовании классов.

По этому в следующих уроках я продемонстрирую возможности классов на примере небольших программ.

 

 

 

Смотреть видео

В начало

 

 



 

Категория: Уроки VB.net | Добавил: ProfessorVB (2016-01-15)
Просмотров: 6195 | Теги: Урок, Реализация, ООП, Классы, Vb.net | Рейтинг: 5.0/1
Всего комментариев: 0
avatar
Облако тегов
Поиск
Друзья сайта
  • www.youtube.com

  • vk.com/professorvb

  • Партнерка AIR

  • Партнерка VSP Group
  • Поделись с друзьям
    Теги
    Видео Switch массивы уравнения геометрия continue forEach while Обработка событий задать цвет C# math Vb.net xml количество элементов xml поиск значений математика видеоуроки Soft системы Google pirat Proxy tor НОД нок добавление записи в xml поиск Уроки генератор hello world время деструкторы конструкторы дроби калькулятор десятичные дроби решебник сокращение дробей си шарп мнемоника тренажер random количество дней между датами professorvb дата Урок mindgames алгебра многомерные слова словарь Пароль cos SIN база timer рандом Цикл Break DO for RGB условия массив элементов xml редактирование xml создание вирус MenuStrip AntiCenz fri-gate запрещенные сайты база данных Open RichTextBox XML удалить из xml save TopMost анекдот создать XML Классы Тест OpenFileDialog английский развитие иностранные слова DateTimePicker календарь массив перемешивание массива Анаграммы Рифмоплет Сравнение дробей Меморина скорочтение Использование ребусы комплексные числа программа генератор имен
    Copyright ProfessorVB © 2025