ПОНЯТНО О Visual Basic NET



              


Еще о пользе переменных


Переменные быстры. Значения переменных величин не обязаны, подобно тексту элементов управления, отображаться «на медлительной поверхности проекта». Они спрятаны глубоко в сверхбыстрой оперативной памяти компьютера, там над ними удобно проводить вычисления и разнообразные логические преобразования. Фактически вся мыслительная работа компьютера проводится над переменными величинами. И лишь иногда, когда человеку понадобится, они показываются «на поверхности» в виде содержимого текстовых полей или как-нибудь еще.

Создавая калькулятор, мы не ведали ни о каких переменных, поэтому вместо изящного

Рез = Чис1 + Чис2

писали громоздкое

Результат.Text = Val(Число1.Text) + Val(Число2.Text)

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

Улучшаем калькулятор. С учетом сказанного попробуем улучшить программу калькулятора:

Public Class Form1

    Inherits System.Windows.Forms.Form

Windows Form Designer generated code

    Dim Чис1 As Double                 'Переменная, содержащая число из текстового поля Число1

    Dim Чис2 As Double                 'Переменная, содержащая число из текстового поля Число2

    Dim Рез As Double                   'Переменная-результат, предназначенный для текстового поля Результат

    Private Sub Кл_сложения_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _

Handles Кл_сложения.Click

        Чис1 = Число1.Text             'Значения исходных данных переходят из текстовых полей в переменные

        Чис2 = Число2.Text

        Рез = Чис1 + Чис2               'Обработка переменных для получения результата

        Результат.Text = Рез          'Значение результата переходит из переменной в текстовое поле




Содержание  Назад  Вперед