منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

احتاج الى كود بسط لهذا البرنامج

السلام عليكم

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

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

(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

(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:50 PM)abulayth كتب : [ -> ]

(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)

عذرا اخي الكريم لم انتبه لردك الكافي والوافي
يعطيك العافية

تحت امرك ابو ليث ،، بالعكس انا وضعت الكود فقط ،، انته افضل مني وضعت كود + مثال ... بالتوفيق للجميع

جعلها الله في ميزان حسناتكم
شكرا لكم