Дана фраза. Определить, имеются ли в ней симметричные пятибуквенные слова? - VB

function isSym(w as string) As Boolean
    l%=len(w)
    if (l%<=1) then
       isSym=True
    elseif left$(w,1)=Right$(w,1) then
       isSym=isSym(mid$(w,2,(l%-2))
    else
       isSym=False
    end if
End Function
 
Sub Main
      Sent$="ап оргро прлл имиь олл"
      wArr=Split(Sent$," ")
      for i%=0 to ubound(wArr,1)
           w$=Cstr(wArr(i%))
           if len(w$)=5 And isSym(w$) then
             Debug.print w$
           end if
      next i%
End Sub