[حريف برمجة]

(16-11-15, 11:16 PM)احمد عبد الحكيم كتب : شكرا لك اخى الحريف اضعها فى انهى حدث

هذا كود الاخ اللي قبلي بعد التعديل عليه :

ضعه في كوماند بوتن

لنفرض لديك عدد خمسه تكست بوكس
تكست بوكس 1 يوجد فيه النص الاصلي المراد تجزئته

تكست بوكس 2 نضع فيه القسم الاول من النص الاصلي
تكست بوكس 3 نضع فيه القسم الثاني من النص الاصلي
تكست بوكس 4 نضع فيه القسم الثالث من النص الاصلي
تكست بوكس 5 نضع فيه القسم الرابع والاخير من النص الاصلي

الكود يكون كالتالي :

كود :

Dim words As String() = TextBox1.Text.Split(New Char() {" "c})

       TextBox2.Text = words(0)
       TextBox3.Text = words(1)
       TextBox4.Text = words(2)
       TextBox5.Text = words(3)