Hi, I have a memo field of letters and I changed the character names from: "two" as "many" and "one" as "single". But I don't how to calculate how many has been change.
Sample text: One Apple Two Oranges Two Pears 'my sample code: Function FindRepl(x) Dim Rep1, Rep2 As String Rep1 = x Rep2 = Rep1 Rep1 = Replace(x, "Two", "Many") 'how can I calc how many replace of Rep1 has been changed Rep2 = Replace(Rep1, "One", "Single") FindRepl = Rep2 End Function Thanks, Julius '2002 ------------------------ Yahoo! Groups Sponsor --------------------~--> Get Bzzzy! (real tools to help you find a job). Welcome to the Sweet Life. http://us.click.yahoo.com/A77XvD/vlQLAA/TtwFAA/q7folB/TM --------------------------------------------------------------------~-> Please zip all files prior to uploading to Files section. Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/AccessDevelopers/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
