+ 86-591-8756 2601

Plani i Trajnimit

12 Tjetra> >> Faqja 1/2

" sOut=re.Replace(sOut,"") re.Pattern=". * "sOut = re.Replace (sOut," ") re.Pattern =".*" sOut=re.Replace(sOut,"") re.Pattern="(]*)>)" sOut=re.Replace(sOut,"") Set re=Nothing TextOnly=sOut End Function %>