Dim x As Single, y As Single, Rezult As Single

где x — переменная, в которой будет храниться значение, введенное пользователем в поле txtX; y — переменная, в которой будет храниться значение, введенное пользователем в поле txtY; Rezul t — переменная, в которой будет храниться результат вычислений.

б) составьте программный код для командной кнопки cmdPlus:

Private Sub CmdPlus_Click()

x = Val(TxtX.Text)

y = Val(TxtY.Text)

Rezult = x + y

TxtRezult.Text = Str(Rezult)

End Sub

6. Запустите проект и проверьте правильность выполнения операции сложения.

7. Самостоятельно составьте коды для командных кнопок
cmdMinus (вычитание), cmdMult (умножение), cmdDiv (деление).

8. Запустите проект и проверьте правильность выполнения операций вычитания, умножения, деления.

9. Составьте программный код для командной кнопки cmdRnd:

Private Sub cmdRnd_Click()