Расчёт формул средствами пользовательских форм

[uncleau]

Добрый день, прошу помощи с лабораторной.
Есть две функции:
1. z=((1-xy-x^2-y^2)/y^3)-(x/y^2))

2.1 при x<1 --> g=ABS(ABS(x)^1/2/(x+1))
2.2 при x>=1 --> g=1-x^2

Необходимо разработать пользовательскую форму, в которой в качестве элемента управления для выбора варианта решения применяются переключатели (выбираем либо 1, либо 2). На форме необходимо определить поля ввода данных для расчёта значения функции в заданной точке и вывода результата вычислений.

[EducatedFool]

Что именно не получается?
Нарисовать форму, добавить поля?

Для чего нужен переключатель на форме?
Что вводится, и что вычисляется?

Если не выложите свои наработки - тему закрою.

[uncleau]

Вообщем, вот моё решение:

Private Sub CommandButton1_Click()
If OptionButton1.Value Then
Call z
ElseIf OptionButton2.Value Then
Call g
End If
End Sub

Private Sub CommandButton2_Click()
End
End Sub

Public Function z() As Double
Dim x, y As Integer
x = TextBox1.Value
y = TextBox2.Value
z = (1 - xy - x ^ 2 - y ^ 2) / y ^ 3 - (x / y ^ 2)
Label3 = z
End Function
Public Function g() As Double
Dim x As Integer
x = TextBox1.Value
If x < 1 Then
g = Abs((Abs(x) ^ 1 / 2 / (x + 1)))
Else
g = 1 - x ^ 2
End If
Label3 = g
End Function

Всё работает и прекрасно счетает