VBscript, prosim o pomoc

V programe mam moznost pouzit tento VBscript,ale o VB nemam ani sajnu
Ako mozem dat nahradit napr. 3rozne znaky? za napr.@

Konkretne chcem nahradit ,,zloz,, ,,najo,, ,,lan,, za ,,@,,
Ako by mal v tom pripade vyzerat tento script?

.. alebo ako to naprogramovat vo VB ?

dakujem za pomoc


Function Main ( strText )

dim strResult

strResult = Replace_String ( strText , ">" , "@" )

Main = strResult

End Function