معکوس چند کلمه در جمله

[yasinmh]

سلام کسی میتونه کمک کنه .
با دیدن نقطه کلمه را با تشخیص حرف فاصله
معکوس کند. مثلا علی آمد. بشود آمد علی

[M8SPY_OK]

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

ببین یه راه حل دارم : همونطور که خودت گفتی کلمات رو با استفاده از فاصله ای که بین اونها وجود داره شناسایی می کنیم بعد دونه دونه اونها رو توی یک لیست باکس قرار میدیم . بعد از اینکار محتویات یا همون Count های لیست رو از آخر به اول توی یک تکست باکس می چینیم .

اگه وقت کردم برنامشو برات می نویسم /
موفق باشی ...

[ƒxmahdi]

البته چون وقت نداشتم زیاد روش کار نکردم یه سری اشکالات داره شما رفع نمایید

[vbhamed]

سلام
اینم برنامه ای که می خواستی :

[soheil_programmer]

با سلام


Dim inputTxt As String, strArr() As String, sumTxt As String

inputTxt = "علی آمد."
If InStr(1, inputTxt, ".") <> 0 Then
strArr = Split(inputTxt, " ")
For i = LBound(strArr) To UBound(strArr)
sumTxt = strArr(i) & " " & sumTxt
Next i
End If

sumTxt = Replace(sumTxt, ".", "")

MsgBox sumTxt

من سورس این برنامه را هم به صورت پروژه ای خدمتتون ارسال کردم...

[yasinmh]

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

خدا به علمتون اضافه کناد.