主题：多个地址同时打印的方法

此主题相关图片如下：print.png

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:ems打印.foxdb

请问 这个代码该怎么写啊

 

如果选择地址1 

电话= phone

地址= address

 

点打印 打印一张

 

如果选择地址2

电话 =phone1

地址 =address1

 

点打印 打印 当前电话和 地址

 

地址3 也是一样

电话 =phone2

地址 =address1

 

打印

 

重要的是这里

如果同时选中 地址1 ，地址2 地址3 后 点打印的话 

 

则 同时要打印三个不同的单。

 

请各位大侠 多多指点 这里先谢谢了！！！

 最后你要打印什么，打印成什么样的单子。

就打印成窗口的样子就行， 样式我回调，就是代码太难了，

你的提问，别人真不知道你想问什么

 

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