最近公司要进行《计算机软件著作权登记》。在登记中对源程序要求:A4版面WORD文档电子版本,需要提供前40页,后40页一共80页。提供代码的最后一页必须是软件的结束或者模块的结束。提供的源程序包含窗体代码吗?
有做过登记的吗!请指教在登记申请时要注意什么事项!

解决方案 »

  1.   


       Dim Application As Object
       Dim Document As Object
       Set Application = CreateObject("Word.Application")
       Set Document = Application.Documents.Add
       Document.Activate
       Application.Options.CheckGrammarAsYouType = False        '不检查语法
       Application.Options.CheckSpellingAsYouType = False       '不检查拼写
       Application.Selection.Font.Size = 32                     '设置字体大小
       Application.Selection.Font.Bold = True                   '开始粗体字
       Application.Selection.TypeText "标题"                    '输出公文标题
       Application.Selection.Font.Bold = False                  '结束粗体字
       Application.Selection.TypeParagraph                      '段落回车
       Application.Selection.Font.Size = 12                     '设置字体大小
       Application.Selection.TypeText "    这里是公文正文"      '输出公文正文
       Document.SaveAs "C:\11.doc"                              '保存Doc到指定位置
       Document.Close                                           '关闭
       Application.Quit
      

  2.   

    vb的工程文件vbp和窗体文件frm等可以用文本方式打开,读取数据后,就可以用2楼哥们的代码填数据,注意要引用microsoft word 11.0 object library (word 2003)