Fa convertor for input text

[evil_gates]

دوست عزيز
قبلا كه عرض كردم دسترسي ندارم به mmb

تو پنجره message چه چيزي رو نمايش ميده؟

 

[behjati mohamma]

دوستان موفق شدم با یک ترفند کوچولو به جواب برسم
1: یک input text در صفحه ایجاد کردم و مقدار درونش را برابر با یک اسپیس قرار دادم و اسمش رو گزاشتم t
2 کد ها رو بدین شکل تغییر دادم
CODE

EditBox$=t$+EditBox$
lenedi=LEN(EditBox$)
emp$=''
For i=1 To lenedi
  gtf$=StrCopy(EditBox$,i,1)
  frr=ORD(gtf$)+2
  gt$=CHR(frr)
  emp$=emp$+gt$
Next i
LoadText("EditBox1","emp$")

UNCODE

EditBox1$=t$+EditBox1$
lenedi=LEN(EditBox1$)
emp$=''
For i=1 To lenedi
  gtf$=StrCopy(EditBox1$,i,1)
  frr=ORD(gtf$)-2
  gt$=CHR(frr)
  emp$=emp$+gt$
Next i
LoadText("Text1","emp$")

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

 

[Amit13]

1: یک input text در صفحه ایجاد کردم و مقدار درونش را برابر با یک اسپیس قرار دادم

خوب چرا يك input text ????? يك string تغريف ميكردي و مقدارش رو به دو صورت زير ميتونستي اسپيس بدي،نميشد؟؟؟

space$=CHR(32)

يا راحتر

space$=' '

راستي ممنون هم از اصلاح.

 

[behjati mohamma]

اشکال کار من اینه که تو مثالی که برای شما می گذارم چون دکمه تولید کد نمی توانست مسیر c:\test\1 رو به درستی کد کنه من اومدم یک اسپیس قبل از c قرار دادم و جواب داد و پس از آن کد شدن درست نشون میده ولی در واقع یک اسپیس دربخش نمایش آن کد قبل از c زیادیه درسته که دیده نمیشه ولی برام مشکل ساز شده میخوام اون اسپیس زیادی رو که در آن کد وجود داره حذف کنم و تو یک متغییر دیگه ذخیره کنم یعنی بدون اسپیس زیادی لطف میکنید کمک کنید اینم نمونه

http://forum.majidonline.com/attachment.php?attachmentid=46408&d=1281200040