Access a Friend function in a Class module from a standard Moldule

[milovnik]

Hello.
I´m trying to make my procedure faster, which starts with reading a few MB txt file line by line and by checking for the presence of a string in each line.
For testing I downloaded this code, which is ought to make the InStr search much faster: http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=30761&lngWId=1

A new Class Module was created upon import of the code. The code contains the following function:
Friend Function InString(Start As Long, String1 As String, String2 As String, Optional Compare As VbCompareMethod = vbBinaryCompare) As Long

How can I use this InString function from my standard module? I never used or heard of Class Modules before.

Thanks for any help.

 

[RoryA]

You need to create an instance of the class and call its method. For example:

    Dim c As InString
    Set c = New InString
    MsgBox c.InString(1, "hello", "e")

 

[milovnik]

Thanks RoryA. It did work. I've googled the issue before and saw this solution, but didn't get the explanation there.
For those who are interested, my procedure got faster by ca. 20% using the new InString function. The slowest part is apparently reading of the txt file.