السلام عليكم..
لفت انتباهي دالة اسمها Trim تستعمل بالشكل التالي:
If Trim( TextBox1. Text) = "" Then
MsgBox("لا يوجد نص")
Else
MsgBox(" يوجد نص")
End Ifممكن توضيح لعمل الTrimهذا لا أذكر أنه كان موجود في VB6.
وشكرا لكم.وكل عام و انتم بخير في حال كان العيد غدا :lol:
السلام عليكم
اولا الداله Trim كانت موجودة فى vb6 وما قبله
ووظيفة هذه الداله انها بتشيل المسافات للنص من البداية والنهاية
يعنى لوكان عندك هذا النص
" SOLO.NET "
لاحظ المسافات او الفراغ فى بداية ونهاية النص
ولو طبقنا عليه الدالة Trim يكون هذا الناتج
"SOLO.NET"
بدون اى فراغات :D
VB.NET and C# Comparison
http://www.harding.edu/fmccown/vbnet_csharp_comparison.html
=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده
السلام عليكم
الـ Triming هي عملية حذف الفضاءات أو الفراغات في أول أو أخر البيانات المدخلة.
هنالك ثلاثة وظائف من هذا النوع وهم
1 - LTrim تحذف الفراغ من الجهة اليسرى
2 - RTrim تحذف الفراغ من الجهة اليمنى
3 - Trim تحذف الفراغ من كِلى الجهتين اليمنى و اليسرى.
شاهد المثال المرفق لتوضيح ذلك. المشروع منشئ على بيئة التطوير 2005
بالتوفيق إن شاء الله.
في المثال يتضح المقال
شكرا لكم إخواني الكرام ..فعلا دالة بسيطة لم أسمع بها من قبل ..
أخي الكريم الغملاسي.. و الله إني لا أملك 2005 يا رجل كل مرة تحرمنا من مثال رائع ..سوف أشتريها في أقرب وقت :lol:
LTrim Str =" Crazy " Str = LTrim(Str) Str="Crazy " ------ RTrim Str=" Crazy " Str=RTrim(Str) Str=" Crazy" ------ Trim Str=" Crazy " Str=Trim(Str) Str="Crazy"
تم تعديل هذه المشاركة بواسطة crazy-man في 2 نوفمبر 2005 في 02:47
أضيف بعض الشيء لما تفضل به الأخوة هنا جواباً على سؤال طفل المنتدى المدلل "إيّاس"..
ال Trim في ال Managed لا يقتصر دورها على إزالة المسافات بل يتخطى ذلك إلى أيّ Character، وأيضاً يمكنك أن تُعطي الدالة مصفوفة لتقوم بإزالته من النص الذي نعمل عليه، فمثلاً لو أردنا أن نزيل الإشارة "\" من بداية ونهاية النص "\haroon\"، فإننا نقوم بذلك بالصورة التالية:
Dim str as String ="\haroon\"
str =str.Trim("\")وكما أسلفت يمكننا نُعطي الدالة مصفوفة كما في الصورة التالية:
Dim HMS As Char() = {" ", "/", "=", "+"}
Dim str as String ="/=haroon+"
str=str.Trim(HMS)وستكون النتيجة هي فقط haroon
ويمكنك أن تقوم بذلك فقط على بداية النص عن طريق إستخدام:
str.TrimStart(array)
أما نهاية النص فيمكن العمل عليه كما هو المتوقع بالصورة:
str.TrimEnd(array)
Learn Japanese :>>> http://www.nouben.com/
شرح رائع والله إخواني الكرام Solo و الغملاسي و crazy-man و HMS
:lol: فعلا شكرا لكم ..يعني لولاكم ماذا نفعل نحن جماعة الغلابى على قولة إخواننا المصريين ^.^.
جزاكم الله خيرا على الملعومة الخفيفة ده
لا حول و لا قوة الا بالله العلي العظيم
مشروع المخازن و حسابات العملاء و الموردين مع التحليل بطريقة احترافية
هذا الموضوع مغلق.