• Home
 · 
• String Manipulation
 · 
• This mod will count all occurances of a string inside a string.

This mod will count all occurances of a string inside a string.

This mod will count all occurances of a string inside a string.

API Declarations


'j will be the number of occurances (duh :))
'I haven't found a better one of these but I haven't looked so if someone
'could find one better I would appreciate it if you mailed me, thx. Peace!



Rate This mod will count all occurances of a string inside a string.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim t, r, s, l, m
    t = Len(searchin)
    s = Len(searchfor)
    m = searchfor
    For r = 1 To t
    l = Mid(searchin, r, s)
    If l = searchfor Then
        Dim j As Integer
        j = j + 1
    End If
    Next r
End Function