Заштрихованные Области - VB

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

Люди помогите составить программу на заштрихованные области с помощью которой можно будет вычислять попадает ли точки на заштр.обл. или нет, вводя значения. Я Vb начал не давно заниматься так что полный ноль здесь буду рад если вы успеете мне помочь до 3 часов... График снизу, прикрепленный

Решение задачи: «Заштрихованные Области»

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

                            x=inputbox("значение оси ординат")
y=inputbox("значение оси абсцисс")
if (x^2+y^2<4 and x<0 and y>0) or (x<0 and y<0) or (x^2+y^2>16 and x>0 and y>0) then _
msgbox "попадает, конкретно" else msgbox "не попадает"
                        