Dim a As String = "MiCcSoft"
'لتبديل الحرف M
'بأي حرف
MsgBox(a.Replace("M", "B"))
'لأخذ عدد الحروف
MsgBox(a.Length)
'لأخذ أي حرف
MsgBox(a.Chars(0))
'تحويل جميع الحروف إلى حروف كبيرة
MsgBox(a.ToUpper())
'تحويل جميع الحروف إلى حروف صغيرة
MsgBox(a.ToLower)
'أخذ جميع الحروف بعد رقم الحرف المحدد
MsgBox(a.Substring(5))
'حذف الحروف من الرقم 3 حتى حذف أربعة حروف
MsgBox(a.Remove(3, 4))
Please SUBSCRIBE to get new articles directly into your Email inbox!
'لتبديل الحرف M
'بأي حرف
MsgBox(a.Replace("M", "B"))
'لأخذ عدد الحروف
MsgBox(a.Length)
'لأخذ أي حرف
MsgBox(a.Chars(0))
'تحويل جميع الحروف إلى حروف كبيرة
MsgBox(a.ToUpper())
'تحويل جميع الحروف إلى حروف صغيرة
MsgBox(a.ToLower)
'أخذ جميع الحروف بعد رقم الحرف المحدد
MsgBox(a.Substring(5))
'حذف الحروف من الرقم 3 حتى حذف أربعة حروف
MsgBox(a.Remove(3, 4))
Please SUBSCRIBE to get new articles directly into your Email inbox!
تعليقات
إرسال تعليق