Verify a number exists in an array or not

intFindNumber = 5
arr = array(4,2,7,8,5)
for i=lbound(arr) to ubound(arr)
     if arr(i) = intFindNumber then
         Msgbox "Number Found"
         Exit For
     end if
Next