ایجاد فاصله در آغاز و پایان متن

[behruzian]

با سلام
بنده یک برنامة برگردان خط تحت ویژال بیسیک دات نت نوشته‌ام. دو جعبة تکست باکس 1 و 2 در یک فرم قرار داده‌ام. تکست باکس 1 ورودی متن و تکست باکس 2 خروجی متن است. من می‌خواهم هر متنی که به تکست باکس 1 (یعنی ورودی متن) بدهم، به اندازة یک فاصله (اسپیس) در ابتدا و پایان متن - یعنی هر سطر - افزوده شود. خواهشمند است راهنمایی فرمایید.

[m_zamani]

کد کلید اینتر
vbCrLf

[m_zamani]

TextBox2.Text = TextBox2.Text.ToString + TextBox1.Text.ToString + vbCrLf

[m_zamani]

کد بالا محتوای تکست باکس 1 رو به تکست باکس 2 اضافه میکنه و میره سطر بعد
حالا اگه میخوای دو تا فاصله ایجاد کنه 2 بار کد اینتر رو بذار


TextBox2.Text = TextBox2.Text.ToString + TextBox1.Text.ToString + vbCrLf+vbCrLf

[morteza_261]

سلام


TextBox2.Text = Space(1) + TextBox1.Text + Space(1)

[behruzian]

با تشکر از همة دوستان بویژه مرتضای عزیز. البته عیب از گفتة ناقص خودم بود که نتوانستم درست منظورم را بیان کنم. حتماً برنامة کم حجم فینگلیش را دیده‌اید. سورسی که بنده تهیه نموده‌ام، چیزی تقریباً شبیه به آن و البته با بیش از 50 هزار کارکتر تعریف شده و البته از سریلیک به فارسی و بلعکس. یعنی متن سریلیک در تکست باکس 1 ریخته می‌شود و بلافاصله برگردان آن در تکست باکس 2 ظاهر می‌شود. در واقع من می‌خواهم وقتی متن به تکست باکس 1 ریخته شود، بلافاصله به اندازة یک اسپیس در همان تکست باکس 1 (یعنی همان متن ورودی) اعمال شود. انتقال این اسپیس در تکست باکس 2 ضروری نیست. به هر حال هنوز کد آقا مرتضی را آزمایش نکرده‌ام، اما فکر می‌کنم جواب دهد.
از همة شما صمیمانه سپاسگزارم.