Get what's on the other side of the Equal sign.

This code has been declared by its author to be Public Domain code.

Get what's on the other side of the Equal sign. by Chroma

2003

It is common to save data to a file in the form of "thisdata=10". Well this will let you get the value of 10 easily.

Function ReadMeat$(txt$)
length=Len(txt)
For i=1 To length
     a$=Mid$(txt,i,1)
     If a$="=" Return Mid$(txt,i+1,length-i)
Next
End Function