ترکیب متن های textbox

[ali.b]

سلام خدمت دوستان
من چند تا TEXTBOX دارم که میخوام مقادیر داخل اونها که حروف هستند وقتی ی دکمه رو کیک کردم داخل یک textbox دیگه با کمک کاراکتر مثلا / جدا شن

مثلا تو textbox1 نوشته علی
تو textbox2 نوشته حسن

تو textbox3 نوشته رضا


و میخوام با کلیک روی یک دکمه تو textbox مثلا 4 بنویسه علی/حسن/رضا

و ممکنه هر کدوم از textbox ها حالی باشه
من هرچی تلاش گردم باز هم چه خالی باشه چه نباشه علامت / رو میزازه مثلا textbox2 خالی باشه میشه علی//رضا

کلا 10 تا تکس باکس دارم تو فایل اصلی

ممنونم

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[rasools13]

سلام
از کد ذیل میتونید استفاده کنید.. با چند تا شرط ساده مشکلتون حل میشه یک نمونه هم در فایل پیوست است

Private Sub btn1_Click()
    txt4.Text = ""
    Dim T1, T2, T3, T As String
    T1 = txt1.Text
    T2 = txt2.Text
    T3 = txt3.Text
    T = ""
    If T1 <> "" Then T = T + T1 + "\"
    If T2 <> "" Then T = T + T2 + "\"
    If T3 <> "" Then
        T = T + T3
    Else
        T = Mid(T, 1, Len(T) - 1)
    End If
    txt4.Text = T
End Sub 

به تعداد تکس باکس هایی که دارین از این شرط

If T2 <> "" Then T = T + T2 + "\" 

بزارین.. فقط باید شرط اخر همانند مورد مربوط به T3 باشه