2- حالا میریم سر وقت تکه دوم که قرار هست تکراری ها رو با back reference به تکه اول پیدا کنه:
test_it Join(Parts, " "), pattern
test_it Join(Parts, vbCrLf), pattern
pattern=(\b\w+\b)(?=.*\b\1\b) count=7
This is the part and part now
pattern=(\b\w+\b)(?=.*\b\1\b) count=0
اینجا کاملا واضح هست که این پترن در حالت single line مشکل نداره (احتمالا و با توجه به شرایط)،
ولی وقتی در متن vbcrlf داریم کار نمیکنه!