编程论坛 → VB6论坛

VB输出成word?

栾小栾发布于 2015-07-31 08:15， 654 次点击

请问一下。利用VB怎么把自己编程的程序及运行后的结果输出在word里打印出来？以供做成计算书求高手谢谢！

5 回复

诸葛欧阳2015-07-31 08:24

不造

huwenyi77582015-07-31 18:34

好巧。。。

风吹过b2015-07-31 22:38

代码不多就手动复制粘贴。
代码多，就先用 DOS 命令连接成一个文本文件，再复制粘贴。

lianyicq2015-08-01 09:52

回复楼主栾小栾

按风版说的比较容易也实用。一定要在程序运行中得到自己程序代码，可以参见https://bbs.bccn.net/viewthread.php?tid=443796&extra=&page=1
直接按需要的格式输出结果为WORD、EXCEL、TXT或文本框都容易实现，看看坛子里关于WORD，EXCEL的贴子

chen35232015-08-01 20:36

Private Sub Command2_Click()  '将Text1.text文字输出到Word2003文档
  Dim wdapp As Word.Application
  Dim wddoc As Word.Document
  Set wdapp = CreateObject("word.Application")
  Set wddoc = wdapp.Documents.Add
  wdapp.Visible = True
  wddoc.Content = Text1.Text
End Sub