ما وظيفة Trim؟؟

الدالة Trim بهذا الشكل تقوم بحذف المسافات من بداية ونهاية النص كما توجد الدالتين LTrim لحذف المسافات من جهة اليسار وعكسها الدالة RTrim

بوركت يا طيب

لكن ممكن تضع مثال:

وماذا يعني المثال التالي:

If Trim(Text2.Text) = "" Then

MsgBox "Cannot contain a Null Value .", vbCritical, "Message"

Text2.SetFocus

Exit Sub

End If

اللي فهمته بهذا المثال بانه يفحص text2 اذا كان فارغ ام لا

ولماذا لا نستخدم بدلا منها:

If Text2.Text = "" Then

ما الفرق؟

الفرق انه بإستخدام هذه الدالة اذا كان هناك مسافات فقط في التكست سيعتبره فارغاً

فمثلاً لو كتبنا مسافة في التكست بوكس ولم نستخدم الدالة لن يظهر لنا البرنامج الرسالة لان في هذه الحالة يعتبر التكست بوكس ليس فارغ اما بإستخدام الدالة فسيخلي التكست بوكس من المسافات ويصبح فارغ ومن ثم يعطي لنا البرنامج هذه الرسالة , ونحن نستخدمها في مثل هذه الحالات لان المسافة وحدها ليست بيانات ذات اهمية ولا يمكن اضافتها مثلاً كأسم شخص

وضحت الصورة الان

بارك الله فيكم يا طيبين

:)