用VB怎样生成word文档

franklings

在许多用VB编写的程序中，可以直接用word生成计算书。请问用什么函数就能实现？谢谢

liulisisuo

Imports Word

     ‘打开

     Dim  mWordapp As Word.Application            ‘word 应用程序

     Dim  mobjDoc As Word.Document                  ’word 文档

     Dim fullFileName as string                                ‘文件路径

     mWordapp = CreateObject(”Word.Application”)

     mobjDoc = mWordapp.Documents.Add(FullFileName)

             ‘关闭

     Dim missing As Object = System.Reflection.Missing.Value

            mWordapp.Application.Quit()

            If Not mobjDoc Is Nothing Then

                ‘垃圾回收

                System.Runtime.InteropServices.Marshal.ReleaseComObject(mobjDoc)

                mobjDoc = Nothing

            End If

            If Not mWordapp Is Nothing Then

                System.Runtime.InteropServices.Marshal.ReleaseComObject(mWordapp)

                mWordapp = Nothing

            End If

            ‘真正释放word进程

GC.Collect()