Расcчитать данные

Обработка событий. В нашем калькуляторе есть кнопка Расчет, вставим в программу событие, которое при нажатии данной кнопки будет проводить вычисление введенного в калькулятор выражения.

 

Private Sub кнРасчет_Click()

    If (Me.Выражение = "") Or IsNull(Me.Выражение) Then 'Проверяем выражение

        MsgBox "Введите выражение!", _

            vbInformation, Me.Name 'Сообщаем об отсутствии данных

    Else

        Выражение_AfterUpdate  'Обновляем выражение

    End If

End Sub


Страница сайта http://test.interface.ru
Оригинал находится по адресу http://test.interface.ru/home.asp?artId=10183