جدا کردن کلمات در TextBox

[_behnam_]

سلام بچه ها
می خواستم کلمات یک تکست باکس را از هم جدا کنم. یعنی تو یک تکست باکس 3 تا کلمه باشه. با زدن دکمه . کلمه اول بره تو تکست باکس 1 کلمه دوم بره تو تکست باکس 2 کلمه سوم هم بره تو تکست باکس سه .
آیا امکان این کار هست؟ اگه میتونید کمکم کنید.

[javadt]

بله هست
شما مي تونيد متن رو با تابع split جدا كرده و در يك آرايه بريزيد
اين تابع يك كراكتر رو براي جدا كردن رشته مي گيره و بر اون اساس رشته رو تقسيم مي كنه
يك نمونه براتون گذاشتم كه با space جدا شده
يك كامند و يك تكست روي فرم بزاريد و كد زير رو در فرم پيست كنيد

Dim st() As String

Private Sub Command1_Click()
st = Split(Text1.Text, " ", , vbTextCompare)
For i = 0 To UBound(st)
MsgBox st(i)
Next i
End Sub

Private Sub Form_Load()
Text1.Text = "Text1 Text25 Text90"
End Sub

[amirsadeghi]

اگه این حالت جواب نداد (البته مطمئنا جواب میده) میتونی کاراکتر به کاراکتر بررسی کنی و تا وقتی به فاصله نرسیدی بریزی تو یه تکست باکس. بعد از فاصله اول بریزی تو تکست باکس دوم و بعد از فاصله دوم بریزی تو تکسن باکس آخر

[mr-adler]

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

[محسن واژدی]

کسی میتونه این روش رو توضیح بده؟

منظور ایشون مشابه تابع split است ، یعنی با رسیدن به کاراکتر space ، مقداری از متن از مکان space قبلی تا مکان فعلی جدا و در textbox تعیین شده کپی میشود

موفق باشید