主题：请教专家：窗体预览正常，打印时后半边没了如何处理？？

 预览，用嵌入专业报表的方式

 打印，单独做一个按钮，直接写 doc.print

去下载开发版的那个网页，下载一个商业版，就可以打开。

参考

http://www.foxtable.com/webhelp/scr/1602.htm

你可以再做一个【打印设置】窗口，让用户输入页边距，然后你根据用户设置的值设置进代码里不就好了？

批量打印的话，你循环每一行不就好了？如代码

Dim cmb As winform.combobox=e.form.controls("combobox1")
For Each r As Row In Tables("凭证经额").rows
    r.Table.Position = r.Index
    Dim doc As PrintDoc = e.Form.GernatePrintDoc()
    If cmb.value<>"请选择打印机:" Then
        Doc.printername=cmb.value
    End If
    doc.print
Next

这个不能用窗口来做，要写代码

http://www.foxtable.com/webhelp/scr/1195.htm

直接print也是旋转后打印？不可能

打印按钮改成

Dim cmb As winform.combobox=e.form.controls("combobox1")
For Each r As Row In Tables("凭证经额").rows
    r.Table.Position = r.Index
    Dim doc As PrintDoc = e.Form.GernatePrintDoc()
    Doc.AutoRotate = False
    Doc.PageSetting.Landscape = True
    If cmb.value<>"请选择打印机:" Then
        Doc.printername=cmb.value
    End If
    doc.print
Next

例子的目的，就是把打印按钮去掉。

 看24楼代码。或者设置纸张 http://www.foxtable.com/webhelp/scr/2904.htm