Arrays vergleichen und Position im Array ausgeben

Da bin ich wieder

Folgende Problemstellung, die für einige wie bastla sicherlich ein Klacks sind.
Für mich als vbs noob aber ne Blockade darstellen.

Ich habe einen "Wert A" dann habe ich ein Array PTNArray(x) wo untereinander Zahlen drin stehen.
Nun möchte ich dieses Array nach dem "Wert A" durchsuchen und die Arrayposition an einen Wert B übergeben.

Wenn ich z.B. PTNArray(12) anspreche, bekomme ich den richtigen Wert.
Nur kenn ich diesen ja nicht vorher. Denn dieser soll sich ja aus der Übereinstimmung mit Wert A ergeben.

Ich hoffe ihr versteht, was ich meine.
VBS ist nicht wirklich was feines, wenn man nicht auf die Lösung kommt.

Das hier klappt irgendwie nicht wirklich....

For f = 0 to UBound(PTNArray)
   if OfPTN(1) = PTNArray(f) then
      Wscript.echo f & " position im Array"  
	  found = true
      Exit For
    End If
  Next