جستجو در یک متغیر

[M.Prince]

سلام دوستان من یه متغیر دارم بر فرض x و این x دارای مقدار زیر هست


x=<strong> <a href="http://barnamenevis.org/forum/member.php?u=108901">M.Prince</a>، خوش آمدید.</strong><br>

من می خوام barnamenevis.org/forum/member.php?u=108901 رو از تو متغیر در بیارم و
در متغیر y قرار بدم
با تشکر

[mpmsoft]

Dim Result as string

Result = Mid("http://barnamenevis.org/forum/member.php?u=108901", InStr(1, "http://barnamenevis.org/forum/member.php?u=108901", "u=") + 2, Len("http://barnamenevis.org/forum/member.php?u=108901"))