تابع Split
بسم الله الرحمن الرحیم
سلام
نوشتن متن آموزش با دهن روزه اگه ریا نباشه یکم سخته!
سرجمع کردن فکر برای نوشتن یک متن مختصر و مفید نیاز به تمرکز داره که شکم خالی معمولا تمرکز رو بهم میریزه. پس اگر متن آموزش کمی مغلق شد، به بزرگی خودتون عفو کنید.
خب تابعی که امروز در نظر گرفتم تابع Split هست.
تابع Split: آرایهای از تعداد مشخصی رشته برمیگرداند که این رشتهها توسط یک کاراکتر جداکننده (delimiter) از درون یک رشته دیگر استخراج شدهاند.
یا به سخن دیگر: این تابع یک رشته را به تعدادی زیر رشته کوچکتر تقسیم میکنه و هر کدام را در یکی از خانههای آرایه قرار میدهد.به عبارت دیگر هر کدام از کلمات رشته در یک خانه آرایه قرار میگیرد.
خروجی این تابع یک آرایه یک بُعدی است که هر کدام از خانههای آن دارای یکی از زیر رشتهها است.
فرمت کلی آن بصورت زیر است:
Split(Expression, [Delimiter], [Count], [Compare])
توضیحات پارامترها:
- Expression: رشته اصلی
-
Delimiter: این پارامتر اختیاری است و کاراکتر جداسازی را نشان میدهد.
- در صورتیکه این پارامتر وارد نشود کاراکتر فاصله (" ") برای جداسازی استفاده میشود. در صورتیکه طول این کاراکتر صفر باشد یک آرایه تک عضوی که شامل کل Expression است برگردانده میشود.
- Limit: تعداد رشتههای موجود در آرایه را نشان میدهد. در صورتیکه این پارامتر داده نشود کلیه رشتههای جداشده در آرایه خروجی قرار میگیرند.
- Compare: نوع جستجو را نشان میدهد. اگر این پارامتر 0 داده شود جستجوی متنی انجام میشود و اگر 1 داده شود جستجوی باینری انجام میشود.
فرض کنید متغیری رشتهای به نام آدرس تعریف کردهایم که مقدار زیر در آن قرار گرفته است
تابع Split در این حالت میتواند هر یک از اجزای این مقدار را که با کاراکتر (\) از هم جدا شدهاند را با دستور زیر جدا کرده و در خانه های یک آرایه به نام Parts قرار دهد:
Parts = Split(Address,"\")
به نمونه زیر نگاهی بندازین:
Dim Address As String Address = "D:\Examples\Controls" Dim Parts As String Dim i As Integer Parts = Split (Address,"\") For i = 0 To Parts.GetUpperBoound(0) MsgBox (Parts(i)) Next
اگر سوالی در مورد این تابع بود در بخش نظرات اعلام کنید.
خدا قوت مهندس جان.
اگر امکان دارد روش تفکیک ارقام کد ملی و نمایش هر عدد در فیلدهای جداگانه را توضیح دهید. ممنون