- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 根据选择窗口，批量套打 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93057)
-- 发布时间：2016/11/19 15:01:00
-- [求助] 根据选择窗口，批量套打
各位老师，好
我准备设计一个窗口如图，来完成套打 ，套打模板已设计好了，想实现一下功能，望能帮助。
1、使用单项选择，来选择需要套打窗口。
2、选着单条打印，可根据单选打印出对应票据。
3.选择指定范围，批量打印可实现对应窗口套打
主窗口： 
此主题相关图片如下：捕获.png
套打窗口1：此主题相关图片如下：捕获2.png
套打窗口2：此主题相关图片如下：捕获3.png
-- 发布时间：2016/11/19 15:16:00
--
1、类似
If e.Form.Controls("RadioButton1").Checked Then
Forms("窗口1").open
Else
Forms("窗口2").open
End If
2、类似
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()
doc.Preview()
3、参考：
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=418575&ID=62023&skin=1
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=65482
可以不用分成多个窗口，直接在第一个窗口加一个页面组合，在页面设置打印内容
-- 发布时间：2016/11/26 14:56:00
-- [求助] 根据选择窗口，批量套打
老师，好
我自己尝试里一下，还是没弄好，上传项目希望老师给改一下，谢谢。
信封打印系统 单选窗口对应的套打窗口
单选窗口：打印对账单 = 开窗信封账单窗口
打印地址标签 = 地址贴80X40窗口
打印DL信封 = 信封打印窗口
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:完整版设计.rar |
[此贴子已经被作者于2016/11/26 14:56:40编辑过]
-- 发布时间：2016/11/26 15:04:00
-- 回复：（有点蓝）1、类似If e.Form.Controls("RadioBu...
老师，好
我自己尝试里一下，还是没弄好，上传项目希望老师给改一下，谢谢。
信封打印系统 单选窗口对应的套打窗口
单选窗口：打印对账单 = 开窗信封账单窗口
打印地址标签 = 地址贴80X40窗口
打印DL信封 = 信封打印窗口
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:完整版设计.rar |
-- 发布时间：2016/11/26 15:15:00
--
If e.Form.Controls("RadioButton1").Checked Then
Forms("开窗信封账单窗口").open
Forms("开窗信封账单窗口").Controls("Button3").PerformClick()
ElseIf e.Form.Controls("RadioButton2").Checked Then
Forms("地址贴80X40窗口").open
Forms("地址贴80X40窗口").Controls("打印预览").PerformClick()
ElseIf e.Form.Controls("RadioButton3").Checked Then
Forms("信封打印窗口").open
Forms("信封打印窗口").Controls("Button1").PerformClick()
End If
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:完整版设计.foxdb |