Pierwiastek
Należy utworzyć nowy projekt, wstawić obiekty typu TextBox(3) oraz Label (9).
Wprowadzić odpowiednie zmiany tak, aby nadać aplikacji wygląd zbliżony do poniższej
ilustracji.
Następnie należy dodać menu do programu. Poprzez kliknięcie lewego przycisku myszki na
formatce należy wywołać menu kontekstowe i wybrać opcję Menu Editor.
Posługując się strzałkami oraz przyciskami Next, Insert oraz Delete należy zbudować menu
według wzoru podanego poniżej. Każda pozycja menu musi mieć wypełnione pole Caption
oraz Name
Zadeklarować zmienne, które będą przechowywać wartości współczynników równań, delty
oraz wyniki rozwiązań.
Dim a, b, c, delta, wynik1, wynik2 As Double
Zaprogramować procedury change przycisków wykorzystując funkcję val() tak eby przypisać
zmienym a,b,c odpowiednie wartości współczynników, które będą wpisywane
w TextBox’ach.
Zaprogramować działanie poszczególnych pozycji w menu. Aby wywołać procedurę Click
dla danej opcji należy kliknąć lewy przycisk myszy na tej pozycji. W celu wykonania
obliczeń można posłużyć się komendą Select ...... Case, której schemat przedstawiony jest
poniżej.
Do obliczenia pierwiastka kwadratowego służy funkcja sqr().
Select Case delta
Case Is < 0
.................
.................
Case Is = 0
.................
.................
Case Is > 0
.................
.................
End Select
Zadanie
Wstawić kolejne opcje do menu dające możliwość zmiany koloru formatki.