Search whether the given name is exists or not using vb script

names=array(“gopi”,”ramu”,”ravi”,”raju”)
str=inputbox(“enter name to search”)
for i=0 to ubound(names)
if str=names(i) then
msgbox “the given name “&str&” is there ”
exit for
end if
next