参考：http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=70797&skin=0
上述方法可以找到关键字，比如关键字是ABC，文件里有ABC-111和ABC-2222，怎么能输出这两个字符串
ABC-111和ABC-2222后面是还有其它字符？还是有空格，逗号等？如果是空格等符号，取ABC后面的字符串，直接取到空格等符号即可
后面是空格或直接结束了。能帮忙写个例子吗，我现在没有思路
比如
dim range = Doc.Content
if doc.Content.Find.Execute(FindText:="ABC") then
dim s as string = range.Paragraphs(1).Range.Text
dim a as integer = s.indexof("ABC")
id a > -1
msgbox(s.substring(a))
dim b as integer = s.indexof("
",a)
if b > -1
msgbox(s.substring(a, b-a + 1))
end if
end if
end if