1. This is what i see in HELP documentation of QTP for 
parameterization of OR--->  "Repository parameters enable 
you to specify that certain property values should be 
parameterized, but leave the actual parameterization to be 
defined in each test that is associated with the object 
repository that contains the parameterized test object 
property values". 

You can see a lot more in the help documentation on this, 
just do a search with the tag "Working with Repository 
Parameters ".-- Hope this will help you

2.
str=”any string”
dim c as integer

for i=1 to len(str)

if  mid(str,	i,1) = ‘a’  or  mid(str,	i,1) = ‘e’ 
or  mid(str,	i,1) = ‘i’  or  mid(str,	i,1) = ‘o’ 
or  mid(str,	i,1) = ‘u’  or  mid(str,	i,1) = ‘A’ 
or  mid(str,	i,1) = ‘E’  or  mid(str,	i,1) = ‘I’ 
or  mid(str,	i,1) = ‘O’  or  mid(str,	i,1  = ‘U’
then
c=c+1
print mid(str,	i,1)  “This is “ , c, “Vowel”
end if
next

Made few updates to above code 

str= "jack sparrow"
dim c 

for i=1 to len(str)


If mid(str,i,1) = "a" or 
mid(str,i,1) = "e" or 
mid(str,i,1) = "i" or 
mid(str,i,1) = "o" or 
mid(str,i,1) = "u" or 
mid(str,i,1) = "A" or 
mid(str,i,1) = "E" or 
mid(str,i,1) = "I" or 
mid(str,i,1) = "O" or 
mid(str,i,1) = "U" then
c=c+1

msgbox mid(str,	i,1) "this is a" &c "Vowel"
else
end if
next

gdfg