标题:[求助]vb中一个输出打印问题?
只看楼主
war525
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2007-3-6
 问题点数:0 回复次数:3 
[求助]vb中一个输出打印问题?

只想打印出一个窗体中一个文本框中的text(文本内容)怎样设置呀!!

生手请教!
谢谢

搜索更多相关主题的帖子: 打印 输出 文本 生手 
2007-04-28 22:56
huangwy
Rank: 1
等 级:新手上路
威 望:2
帖 子:297
专家分:0
注 册:2007-3-23
得分:0 

可以使用诸如以下的格式:
debug.print text1.text

2007-04-29 11:29
war525
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2007-3-6
得分:0 

谢谢上面兄弟!
我说的是像EXCEL一样打印出来

2007-04-29 21:28
mingwangxing
Rank: 1
等 级:新手上路
帖 子:36
专家分:0
注 册:2007-5-24
得分:0 

' 下面是后台编辑EXCEL并后台打印,打印格式就是b.xls原来的格式.希望有帮助.
Dim E,O,B
set E = CreateObject("Excel.Application")
Set O = E.Workbooks.Open("D:\b.xls")
set B=O.sheets("sheet1")

B.range("a1").value="那个文本框的内容"
'下面实现EXCEL后台打印.
O.ActiveSheet.PrintOut

O.Save
O.Close
E.Quit

2007-05-26 00:48



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-135812-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.649847 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved