作业帮 > 综合 > 作业

WORD怎么自动查找带有相同汉字的短语归类一起?

来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/18 14:14:55
WORD怎么自动查找带有相同汉字的短语归类一起?
例如下面的文档,只查找括号内的汉字.
“?”代表任意字符(有可能是汉字,但不需查找).
“*”代表数字或字母.
即只查找括号内汉字,外面的汉字不查找,归类时要带上这个汉字的一整条内容.
?(外国人*)?
?(社会人*)?
?(中国人*)?
?(美国人*)?
?(中间*)?
按顺序查找带相同汉字的短语归类后 如下:

?(外国人*)?

?(外国人*)?
?(中国人*)?
?(美国人*)?

?(外国人*)?
?(社会人*)?
?(中国人*)?
?(美国人*)?
?(人间*)?

?(社会人*)?

?(社会人*)?

?(中国人*)?
?(中间*)?

?(美国人*)?

?(中间*)?
?(人间*)?
补充:举例的原文档内容漏了下面一行
?(人间*)?(在举例的分类完成文档里是有的.)
懂VB代码的请帮助一下吧,代码请发至351649048@qq.com
第一次在百度知道问问题,以前都是只搜索的.解决问题后,追加150分再采纳答案.请帮忙吧.
WORD怎么自动查找带有相同汉字的短语归类一起?
instr 可以实现你想要的功能.
返回 Variant (Long),指定一字符串在另一字符串中最先出现的位置
InStr( [start,] string1,string2 [,compare] )
start:从哪里开始搜索
string1:被搜索的内容
string2:要搜索的内容
具体代码没法写.因为我也不清楚你想要实现的是什么样子的.
举个例子
段1:123
段2:234
段3:456
段4:567
.
段N:...
假如要找“3”
dim A as string
dim B as integer
open 文件名 for input as #1.