微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题CCED文件向Word文件的转换技巧
栏目软件操作与技巧
作者四川 陈晓敏
发布1995-12-01
  在录入CCED文件时,可随意设定左右边界,按CCED的排版方式进行排版(不必设定控制码),只能按原码格式存盘退出(若按文本文件、分离模式、加密方式存盘,将不能正确分段和读出)。
  在中文Word下,调出CCED文件,选择文本文件类型,即可将CCED文件调入中文Word环境下。调入后的CCED文件存在三个问题:一是每段行首出现四个字符的空格:二是自动换行(即软回车)处出现了一个字符的空白(不是空格):三是CCED排版时在文字间插入的软空格在Word下显示为“”。行首出现的空格可用替换的方法加以消除;软回车和软空格却不能用一般的替换法进行替换,如执行人工替换,会出现“未找到搜索字符串”信息,因而无法消除。若人工删除,不仅工作量大,而且容易漏删。笔者通过摸索,编制了一个WordBasic宏文件进行替换,即可消除。值得注意的是:录入该宏文件时,需替换的软回车、软空格不能直接输入,而要从CCED调入Word后的文件里复制。将此宏文件存在Normal模板文件下,加入到Word菜单或工具栏里,就可以方便使用了。
  完整的宏文件如下:
  Sub MAIN
  For i=1 To 20
  Beep  '设置音响
  Next
  Start0fDocument
  EditReplace,Find="W",.Replace=" ",.MatchByte=
  1,.MatchCase=0,.Format=0,\  '替换空格
  .ReplaceAll=1
  EditReplace .Find="",.Replace=" ",.MatchByte=1,.MatchCase=0,.Format=0,\ '替换软空格,只能用复制和粘贴的办法录入。
  .ReplaceAll=1
  EditReplace.Find="",.Replace="",.MatchBtye=1,.MatchCase=0,.Format=0,\ '替换软回车,只能用复制和粘贴的办法录入。
  .ReplaecAll=1
  End Sub
  (四川 陈晓敏)