Вычислить значение функции - VB (58683)

Формулировка задачи:

Прошу помочь, ибо не шарю вообще Задание: вычислить значение функции при А,В и С-константах (задать самостоятельно) и произвольном "х" (ввести с клавиатуры). y=(A+B)/(2*A-B)*(A+C)*sinx^2+z Про "z" ничего не сказано. Пы.сы.Сорян создал в другом разделе эту тему, просто не знал, что нужно не Basic а в VisualBasic

Решение задачи: «Вычислить значение функции»

textual
                            Листинг программы 
                        

                            Sub Вычисления()
Dim A, B, C, x, y
A = 5
B = 2
C = 3
x = (InputBox("Введите значение x))
y = ((A + B) / (2 * A + B) * (A + C) * Sin(x) ^ 2 + z)
MsgBox (y)
End Sub
                        