Дана последовательность действительных чисел a1, a2, ..., аn. Указать те ее элементы, которые принадлежат отрезку [с, d]. - VB

Sub Task(A() as double, c as double, d as double, Optional i as integer=1)
      if i > Ubound(A,1) then Exit Sub
      If (A(i) >= c) And (A(i) <= d) then Debug.print A(i)
      Task A(),c,d,i+1
End Sub