سوال در مورد یک تابع پارسر

سلام به همه دوستان انجمن یه سوال داشتم

اگه جواب بدین ممنون میشم .

یه تایع نوشتم که یه سری عملیات رو برای من انجام میده و خوبم خروجی میده .

تو یه قسمت یه مشکل دارم

فرض یه رشته به این تابع میدم به صورت زیر

کد:

---

Dim qq As String =Test Test2138  te 1375  13TTT

---

با یه حلقه for each که کل استرینگ رو به صورت زیر پیمایش میکنم

کد:

---

For Each j As String In qq
            If j = " " Then
           
            End If
        Next

---

یا این حلقه اون جا های که اسپیس داره رو پیدا میکنم!

حالا میخوام اونجا های که دو تا اسپیس پشت هم هست یا سه تا اسپیس رو تبدیل به 1 اسپیس کنه

مثلا استرینگ بالا رو اینطوری نشون بده

کد:

---

Test Test2138 te 1375 13TTT

---

بین هر کلمه فقط یه اسپیس!!!
چی کار باید بکنم؟

سلام دوست عزیز.
شما باید از Regex استفاده کنید:

کد:

---

Dim s1 As String = "He s  aw  a c  ute\t  dog ad dfa a  "
        ' B.
        ' Create the Regex.
        Dim r As New System.Text.RegularExpressions.Regex("\s+")
        ' C.
        ' Strip multiple spaces.
        Dim s3 As String = r.Replace(s1, " ")
        MessageBox.Show(s3)

---

موفق و سربلند باشید در پناه حق:11:.

ممنون دوست خوبم خیلی کمک کردی

سلام
راه حل کلی پردازش رشته ها همان regex است که دوستمان hamishebahar معرفی کردند.
ولی حیفم آمد نکته کوچکی را یادآوری نکنم!
اگر فقط و فقط قصد تبدیل دو فضای خالی به یک فضای خالی است شاید کد بسیار ساده زیر کارآمدتر باشد:

کد:

---

if ((object)str != null)
    str = str.Replace("  ", " ");

---

البته ایرادی هم دارد! این به معنی تعویض سه فاصله خالی با یک فاصله نیست!
(((البته راه حل های کوتاهی با ایده های جالب دیگر هم دارد ولی از نظر بازدهی سرعتی خیلی کارامد نیستند)))
موفق باشید.