20-11-15, 06:50 PM
(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)
عذرا اخي الكريم لم انتبه لردك الكافي والوافي
يعطيك العافية
(( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))
