Pr4

Проект калькулятор.

На форме объекты

Textbox1, Textbox2, Label1, Button1, Button2, Button3, Button4.

В окне СВОЙСТВА для кнопок ввести  в свойство ТЕКСТ знаки +-*/.

 

Private sub button1_click()

Label1.text=val(textbox1.text)+val(textbox2.text)

End

 

Private sub button2_click()

Label1.text=val(textbox1.text)-val(textbox2.text)

End

 

Private sub button3_click()

Label1.text=val(textbox1.text)*val(textbox2.text)

End

 

Private sub button4_click()

Dim A as float

Dim B as float

A= val(textbox1.text)

B= val(textbox2.text)

Label1.text=A/B

End

   При выполнении программы введите числа в окна для ввода текста и нажимайте на кнопки  со знаками арифметических операций.

   Получился простейший калькулятор.