[الاصيله]

(20-11-15, 06:23 PM)حريف برمجة كتب :

كود :

Dim arr() As String
arr = Split(Text1.Text, " ")

Text2.Text = arr(0)
Text3.Text = arr(1)
Text4.Text = arr(2)

شكرا للاخ حريف برمجه

---

(20-11-15, 06:44 PM)abulayth كتب : السلام عليكم

ان شاء الله طلبك في المرفقات

يعطيكي العافية

شكرا لك اخي 

abulayth