چگونه از سمت راست يك رشته به تعداد دلخواه متني را جدا كنيم؟

چگونه از سمت راست يك رشته به تعداد دلخواه متني را جدا كنيم؟
مثلا رشته "Ebrahim"
از سمت راست 2 كاراكتر را جدا كنم و بشود "im"
فكر كنم دستور آماده اي براي اين كار باشه ولي من نتونستم پيدا كنم

می تونی از دستور

Dim str as String = "Ebrahim"

str = mid(str,6,2)

و یا

Dim str as string = "Ebrahim"

str=str.Remove(0,5)

استفاده کنی. اولیه اون دو تا حرف آخر رو بر می گردونه ولی دومی عبارت قبل از دو تا حرف آخر رو حذف می کنه.

نقل قول:

---

نوشته شده توسط ebrahimv

چگونه از سمت راست يك رشته به تعداد دلخواه متني را جدا كنيم؟
مثلا رشته "Ebrahim"
از سمت راست 2 كاراكتر را جدا كنم و بشود "im"
فكر كنم دستور آماده اي براي اين كار باشه ولي من نتونستم پيدا كنم

---

 

Dim s AsString = Strings.Right("Ebrahim", 2)

 

موفق باشید

نقل قول:

---

چگونه از سمت راست يك رشته به تعداد دلخواه متني را جدا كنيم؟
مثلا رشته "Ebrahim"
از سمت راست 2 كاراكتر را جدا كنم و بشود "im"
فكر كنم دستور آماده اي براي اين كار باشه ولي من نتونستم پيدا كنم

---

dim s as string = microsoft.visualbasic.right("Ebrahim",2)

موفق باشید

نقل قول:

---

نوشته شده توسط nima898

dim s as string = microsoft.visualbasic.right("Ebrahim",2)

موفق باشید

---

این کار نیاز به ایمپورت نیم اسپیس مربوط به ویژوال بیسیک داره و در محیط عادی کار نمی کنه

نقل قول:

---

نوشته شده توسط ali.hojjati

می تونی از دستور

Dim str as String = "Ebrahim"

str = mid(str,6,2)

و یا

Dim str as string = "Ebrahim"

str=str.Remove(0,5)

استفاده کنی. اولیه اون دو تا حرف آخر رو بر می گردونه ولی دومی عبارت قبل از دو تا حرف آخر رو حذف می کنه.

---

با سلام
این دو دستور اشکال داره چون فقط روی یک مورد مثل مثال مزبور کار می کنه ولی فرض کنید رشته ای سه حرف یا 20 حرف داشته باشه،‌این دستور جواب نمی ده

نقل قول:

---

نوشته شده توسط Computer.Programmer

 

Dim s AsString = Strings.Right("Ebrahim", 2)

 

موفق باشید

---

کلاس String همچین تابعی نداشت ،‌من امتحان کردم

بهترین کد اینه که همه جا کاربرد داره و نیاز به رفرنس و هیچ چیز دیگر نداره

Dim str AsString = "Ebrahim"

str = Mid(str, Len(str) - 2)

MsgBox(str)

نقل قول:

---

نوشته شده توسط Hossis

کلاس String همچین تابعی نداشت ،‌من امتحان کردم

---

دوست عزیز حسین جان این مربوط به کلاس Strings هست نه String. گذشته از اون تابع در همان کلاسی قرار دارد که تابع Mid قرار گرفته ولی به علت پرکاربرد بودن آن بدون ذکر نام کلاس شما می توانید به اون دسترسی داشته باشید.

به نظر من تا زمانی که خود .Net تابع هایی برای کاری که می خواهیم انجام بدیم قرار داده استفاده از تابع های دیگر و چرخاندن آن برای کار خودمون جایز نیست. دستور Right برای جدا کردن رشته از سمت راست و دستور Left برای جدا کردن رشته از سمت چپ است در صورتی که دستور Mid برای جدا کردن بخشی از رشته است که ما نمی دونیم دقیقا کجا قرار داره.

موفق باشید.

اکثر مثال هایی که دوستان نوشتن کدهاش مربوط به vb6 بود البته اون رو هم می شه استفاده کرد ولی بتید ابتدا کلاس مربوطه رو import کرد

ولی این روشی که می نویسم توی دات نت راحت اجرا می شه

 Dim temp As String

        temp = "123456789"

        temp = temp.Substring(temp.Length - 2, 2)