- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 多个地址同时打印的方法 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=69031)
-- 发布时间：2015/5/29 10:46:00
-- 多个地址同时打印的方法
此主题相关图片如下：print.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:ems打印.foxdb |
请问 这个代码该怎么写啊
如果选择地址1
电话= phone
地址= address
点打印 打印一张
如果选择地址2
电话 =phone1
地址 =address1
点打印 打印 当前电话和 地址
地址3 也是一样
电话 =phone2
地址 =address1
打印
重要的是这里
如果同时选中 地址1 ，地址2 地址3 后 点打印的话
则 同时要打印三个不同的单。
请各位大侠 多多指点 这里先谢谢了！！！
-- 发布时间：2015/5/29 10:51:00
--
最后你要打印什么，打印成什么样的单子。
-- 发布时间：2015/5/29 11:11:00
--
就打印成窗口的样子就行， 样式我回调，就是代码太难了，
-- 发布时间：2015/5/29 11:31:00
--
你的提问，别人真不知道你想问什么
If e.Form.Controls("CheckBox1").Checked Then
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()
End If
If e.Form.Controls("CheckBox2").Checked Then
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()
End If
If e.Form.Controls("CheckBox3").Checked Then
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()
End If