یک تابع رشته ای

[hbi]

یک تایع برای این که دو رشته را دریافت و اگر رشته دوم در رشته اول موجود بود یک مقدار خاص رل یرگرداند مثل a و ali چون a در کلمه ali موجود میباشد یک مقدار مثل ترو برگردانده شود یا تایعی شبیه این
با تشکر از کلیه دوستان

[vbprogramer]

سلام دوست عزیز
با استفاده از تابع instr می توانید این کار را انجام دهید
کافیه فقط نام متغییر و بعد عبارت مورد جستجو را روبه روی آن بنویسید
اگر در رشته موجود باشد محل آن را باز میگرداند و اگر موجود نباشد صفر را برمی گرداند
به عنوان مثال :

y=instr("ali" , "l")
مقدار 2 را بر میگرداند

[jk]

به چه شکلی می شه فهمید که تا بار رشته مورد جستجو در داخل رشته اصلی تکرار شده است؟

[mpmsoft]

دوست عزیز یک For بذار تموم
Str1 = متن اصلی
Str2 = حرفی که می خوای تعدادشو در بیاری
باز اگه جور دیگشو خواستی بگو برات بنویسم



Private Function CountInStr(str1 as string,Str2 as string) as long
dim Lng as Integer

For i=1 to Len(str1)
If Mid(Str1,i,1) = str2 then
Lng = Lng +1
End If
Next
CountInStr = Lng
End Sub