关于文档复制问题

来源:百度知道 编辑:UC知道 时间:2024/06/07 05:38:10
---原文档:
搬家
包含
避开
不确定的
---使用金山词霸生词本翻译后:

+搬家
\move
&
+包含
\cover
&
+避开
\avoid
\evade
\keep away from
\escaped
&
+不确定的
\dicey
\dubious
\determinate
\neutral
\questionably
\uncertain
\unsure
&
---问:怎么单独复制出 "+"后,和 "\"后的内容?有特定的操作能做吗?或者自动化处理?
我想达到这种效果:
搬家 move
包含 cover
避开 avoid

倒到WORD文档里,
1、按Ctrl+F 查找"+",替换成"" 。2、查找"^p/" 替换成" " 。3、查 找"^p&" ,替换成"" 。
然后用"Alt" 来选择右方的英文汉译,倒到表格中编辑。

将内容保存为 1.txt 然后在同目录下建立 1.vbs 内容:
set ts = createobject("scripting.filesystemobject").opentextfile("1.txt")
set ts2 = createobject("scripting.filesystemobject").createtextfile("2.txt")
do while true
a = ts.readline
if (left(a,1)="+") or (left(a,1)="\") then
ts2.writeline mid(a,2)
end if
loop
ts.close
ts2.close

内容结束。。这个需要一定的vb基础。
最后会出错退出哦

建议找本vb书看看

将金山词霸生词本翻译后的文件复制到记事本
点编辑-替换-在替换内容输入+再点全部替换.
点编辑-替换-在替换内容输入\再点全部替换.
点编辑-替换-在替换内容输入&再点全部替换.

将+ 和\使用Word的查找替换为空,即可。替换方法http://www.zhongguosou.com/blog/blogview.asp?logID=