حل یک مسئله ی ساده (فوری)

[Adel.p30]

با سلام
می خوام توی یه تکس باکس یه رشته بگیرم و معکوسش کنم
به این صورت :
This is a test

Test a is this
اگه میشه مسئله ی بالا رو به صورت مفصل توضیح و حل کرده
اگه بلدید کمک کنید
متشکر

[Adel.p30]

پس چی شد
کمک کنید لطفاً

[ULF_VB6]

باید اول کلمه ها رو دیتکت کنی و کنار هم بذاری (به صورت برعکس)
با استفاده از تابه Instr میتونی محل های قرارگیری کاراکتر Space رو پیدا کنی بعد کلمات رو جدا کنید و توی یه رشته ی دیگه بذارید کنار هم.
کل سورسش فکر نکنم بیشتر از از 10 خط بشه.

[Bracket]

با split کلاس string هم میتونی این کار رو بکنی .

[omid.sarmad]

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

[BLACK-BLACK]

for a=len(String) to 1 step -1
str=mid(String,a,1)
next

[r_oscar2007]

text2.text = strreverse(text1.text)

[Bracket]

text2.text = strreverse(text1.text)

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

[Smafias]

سلام
با اجازه دوستان


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

پایان :20:

[Adel.p30]

Smafias کارم راه افتاد از شما و تمامی دوستان خیلی خیلی سپاس گزارم