[RaggiTech]

كاتب الموضوع : احمد نبيل احمد

السلام عليكم ورحمه الله

len

تستخدم لمعرفة طول النص (عدد الاحرف) وتستخدم كالتالى

كود :

Len("النص المراد معرفة طوله")

مثال

كود :

Dim s As String
s = "I Love Visual Basic.Net"
MsgBox(Len(s)) '23

الشرح : اولا حجزنا متغير نصى اسمه s ثم اسندنا اليه النص I Love Visual Basic.Net
بعد ذلك ظهرنا نتيجة داله len فى message box وهتكون النتيجة 23 وهو عدد احرف النص
الموجود فى المتغير
او نستخدم هذا الكود

كود :

MessageBox.Show(s.Length)

--------------------------------------------------------------------------------------------------

Trim

وهى تقوم بحذف الفراغات (المسافات ) الموجودة على يمين ويسار النص
مثال

كود :

Dim s As String
s = " I Love Visual Basic.Net "
MessageBox.Show(Trim(s))

نلاحظ ان النص الذى اسندنا الى المتغير s به مسافات على يمينه وعلى يساره ولكن
عند تنفيذ الكود ستلاحظ ان النص ظهر بدون المسافات وهذا بسبب الداله Trim
فهى حذفت المسافات الموجودة على يمين ويسار النص .

-----------------------------------------------------------------------------------------------------

RTrim

هذه الداله تقوم ايضا بحذف الفراغات ولكن تحذف الفراغات الموجودة على يمين النص فقط
مثال

كود :

Dim s As String
s = " I Love Visual Basic.Net "
MessageBox.Show(RTrim(s))

هنا هنلاحظ انها حذفت المسافات الموجودة على يمين النص فقط

-----------------------------------------------------------------------------------------------------

Ltrim

وهى عكس Rtrim فهى تقوم بحذف الفراغات الموجودة على يسار النص
وطبعا مش محتاج مثال اعتقد انك فهمتها

-----------------------------------------------------------------------------------------------------

UCase

تقوم هذه الداله بتحويل حروف النص المرر لها الى حروف كبيرة Capital
مثال

كود :

Dim s As String
s = "I Love visual basic.Net"
MessageBox.Show(UCase(s))

لو نظرنا الى النص الذى اسندنا الى المتغير s هتلاحظ انه فى حروف كبيرة وحروف صغيرة
لكن عند تنفيذ الكود واظهار نتيجة الداله UCase هنلاحظ ان الحروف كلها تحولت الى احرف
كبيرة Capital
وممكن نعملها بهذه الطريقة

كود :

MessageBox.Show(s.ToUpper)

--------------------------------------------------------------------------------------------------

LCase

وهى عكس الداله السابقة فهذه الداله تقوم بتحويل حروف النص المرر لها الى حروف صغيره
وهى اختصار Lower case
فاذا اردنا جعل جملتنا السابقة I Love Visual Basic.Net الى حروف صغيرة نكتب

كود :

MessageBox.Show(LCase(s))

او

كود :

MessageBox.Show(LCase(s.ToLower))

---------------------------------------------------------------------------------------------------

LSet

تستخدم هذه الداله لااخذ جزء من الجهه اليسرى من النص
ونمرر لها وسيطين
الاول وهو source وهو النص الاصلى
الثانى وهو length وبيكن طول النص الى عايز تأخذه من النص الاصلى
مثال

كود :

Dim s As String
s = "I Love Visual Basic.Net"
MessageBox.Show(LSet(s, 6))

فى الكود دا كانى بقوله اظهرلى فى صندوق الرسائل messgae box اول 6 حروف من الجه اليسرى
للنص s وعند تنفيذ الكود هتلقى كتبلك I Love وهما اول 6 حروف موجدين فى النص

-----------------------------------------------------------------------------------------------------

RSet

وهى عكس السابقة فهى تستخدم لااخذ جزء من النص ولكن من اليمين
مثال

كود :

Dim s As String
s = "I Love Visual Basic.Net"
MessageBox.Show(RSet(s, 16))

عند تنفيذ الكود هتلقى ظهرلك اول 16 حرف من جهه اليمين يعنى هيظهرلك جمله
يعنى النتيجة ان هيظهرلك جملة Visual Basic.Net فى messagebox

----------------------------------------------------------------------------------------------------

MId

عن طريق هذه الداله ممكن تأخد نص من البداية التى تحددها والطول الذى تحدده من النص الاصلى
احس ان الكلام غير مفهوم ولذلك نضوف مثال علشان نفهم اكثر

كود :

Dim s As String
s = "I Love Visual Basic.Net"
MessageBox.Show(Mid(s, 8, 6))

هذا الكود هيظهرلك رساله مكتوب فيها visual والسبب فى ذلك هى الداله mid
انظر الى هذا السطر

كود :

MessageBox.Show(Mid(s, 8, 6))

معنا هذا السطر انه يظهر فى messagebox بداية من الحرف 8 الموجود فى النص s
وياخذ 6 حروف من بداية الحرف الثامن
انظر الى الجملة I Love Visual Basic.Net هتلقى ان الحرف الثامن هو حرف v
والمرر الثانى الى هو 6 دا طول السلسلة الى هيخدها وهى 6 يعنى النتيجة هتكون
ظهور كلمة visual

---------------------------------------------------------------------------------------------------

ياريت لو فى حد مش فاهم حاجة من الحاجات دى
يٍسأل عن الى مش فاهمو وان شاء الله اجاوبه
يتنبع بأذن الله >>>>>>>>>>>>