VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



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

by Enigma (2 Submissions)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 8th September 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)

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.



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


Download this snippet    Add to My Saved Code

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

No comments have been posted about This mod will count all occurances of a string inside a string.. Why not be the first to post a comment about This mod will count all occurances of a string inside a string..

Post your comment

Subject:
Message:
0/1000 characters