[danti]

(10-01-23, 08:19 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته 

استفد من الكود التالي :
استبدل المتغير بـ قيمة الداتاجريد :

كود :

Dim strW As String = "عبدالعزيز عبدالله عبدالكريم الفلاني"
Dim s() As String = Split(strW, " ")
TextBox1.Text = s(0) + " " + s(1)

شكرا جزيلاً أخي طه

سوف أحاول جاهداً التعديل عليه..

ولا نستغني عن مساعدتكم..