主题：[求助]能否让打印预览容器内的控件位置自动缩放到纸张的大小匹配？

 你的这个问题，需要用到专业报表去打印。

 或者是用代码对窗口doc对象的位置进行重新的定位，才能把控件打印到对应的位置的。

 建议还是用专业报表去做：http://www.foxtable.com/help/topics/1166.htm

 弄了一下，如下代码

Dim tb As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim pan As WinForm.Panel = e.Form.Controls("Panel1")

Dim doc As new PrintDoc

Doc.PageSetting.Width=180
Doc.PageSetting.Height=100
Doc.PageSetting.TopMargin=10
Doc.PageSetting.BottomMargin=0
Doc.PageSetting.LeftMargin=10
Doc.PageSetting.RightMargin=10

Dim wbl As Double = Doc.PageSetting.Width.value / pan.Width
Dim hbl As Double = Doc.PageSetting.Height.value / pan.Height
For Each c As object In pan.Children
    Dim rt As new prt.RenderText
    rt.Text = c.text
    rt.x =  new C1.C1Preview.Unit(CStr(c.left * wbl))
    rt.y = new C1.C1Preview.Unit(CStr(c.Top * hbl))
    Doc.Body.Children.Add(rt)
Next

doc.Preview()