'  FF_PARSE
'  从一个字符串表达式返回分隔的字段。
'  分隔符包含一个字符串的一个或多个字符，必须完全匹配才能成功。
'  如果nPosition为零或是实际计数外，返回一个空字符串。
'  如果nPosition负数将从右到左搜索。
'  分隔符是区分大小写的
'  Function FF_Parse( ByRef sMainString as String, _
'                     ByRef sDelimiter  as String, _
'                     ByVal nPosition   as Integer _
'                     ) as String

''
''  FF_PARSE
''  Return a delimited field from a string expression.
''
''  Delimiter contains a string of one or more characters that must be fully matched to be successful.
''  If nPosition evaluates to zero or is outside of the actual field count, an empty string is returned.
''  If nPosition is negative then fields are searched from the right to left of the MainString.
''  Delimiters are case-sensitive,
''
Function FF_Parse( ByRef sMainString as String, _
                   ByRef sDelimiter  as String, _
                   ByVal nPosition   as Integer _
                   ) as String
   ' The parse must match the entire deliminter string
   Function = FF_Parse_Internal( sMainString, sDelimiter, nPosition, False, Len(sDelimiter) )
End Function



