用VB打印Word文档是比较简单的功能，首先打开VB 6.0，选择标准EXE，点击确定

在窗体上新建一个按钮控件，commandbutton。方法为点击控件，然后在窗体上像画图一样画个框

双击新添加的按钮控件，把下面的代码粘贴上

Dim Word As Word.Application 创建Word组件

Set Word = New Word.Application

Word.Documents.Open FileName:=“F:/文件/天下第一.doc” 打开指定路径的文件，根据自己的文件地址修改引号内的内容

Word.ActiveDocument.PrintOut 打印

Word.ActiveDocument.Close SaveChanges:=False 不保存并关闭Word文件

Word.Quit 退出Word

Set Word = Nothing 释放内存

生成EXE文件后即可自动打印指定的Word文件了。