欢迎您:游客!请先
登录
或
注册
风格
恢复默认设置
|
展区
文件集浏览
图片集浏览
Flash浏览
音乐集浏览
电影集浏览
|
搜索
Foxtable(狐表)
→
用户栏目
→
专家坐堂
→ 如何预览excel报表
新的主题
投票帖
小字报
下一主题 >>
<< 上一主题
共有
10352
人关注过本帖
树形
打印
复制链接
主题:如何预览excel报表
Fotable
小
大
1楼
|
信息
|
搜索
|
邮箱
|
主页
|
UC
加好友
发短信
等级:五尾狐
帖子:
1015
积分:6979
威望:0
精华:0
注册:
2012/8/1 18:41:00
如何预览excel报表
Post By:2012/10/30 17:17:00 [
显示全部帖子
]
Dim
Book
As
New
XLS
.
Book
(
ProjectPath
&
"Attachments\出库单.xls"
)
Dim
fl
As
String
=
ProjectPath
&
"Reports\出库单.xls"
Book.Build()
'生成细节区
Book.Save(fl)
'保存工作簿
Dim
Proc
As
New
Process
'打开工作簿
Proc.File = fl
Proc
.
Verb
=
"Print"
'指定动作
Proc.Start()
如何把这句 换成打印预览呢
Proc
.
Verb
=
"Print"
'指定动作
下一主题 >>
<< 上一主题
RSS2.0
|
Xhtml无图版
|
Xslt无图版
Copyright © 2000 - 2018
foxtable
.com
Tel: 4000-810-820 粤ICP备11091905号
Powered By
Dvbbs
Version 8.3.0
页面执行时间 0.03125 秒, 5 次数据查询