- 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=108220)
-- 发布时间：2017/10/18 16:06:00
-- 求助
在窗口中设置打印按钮，可是总是不能控制页边距，怎么解决呢？之前直接用窗口打印不行，在朋友的建议下添加了TabControl和panel控件，可是仍然达不到效果。
Dim tb As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim pan1 As WinForm.Panel = e.Form.Controls("Panel1")
\'e.Form.Page.Width = 230\'纸张宽度为210毫米
\'e.Form.page.Height = 200 \'纸张高度为140毫米
Dim doc As PrintDoc
Select Case tb.SelectedPage.text
Case "Page1"
doc = e.Form.GernatePrintDoc(pan1)
End Select
Doc.PageSetting.Width=210
Doc.PageSetting.Height=140
Doc.PageSetting.TopMargin=10
Doc.PageSetting.BottomMargin=10
Doc.PageSetting.LeftMargin=10
Doc.PageSetting.RightMargin=10
doc.Preview()
-- 发布时间：2017/10/18 16:07:00
--
各位有没有好的解决方法，或者我的代码有改进的地方，可以告诉我呢
-- 发布时间：2017/10/18 16:33:00
--
1、先设置，后 GernatePrintDoc
http://www.foxtable.com/webhelp/scr/1602.htm
2、举例(截图或者实例)说明怎么不行？怎样没达到效果？
-- 发布时间：2017/10/19 17:05:00
--
谢谢，已经按您说的解决了，就是没有进行页面设置。
我还可以向您请教个问题吗？这是我做的一个小窗口的界面截图，您看看。我想输入一个身份证号，点击查询按
此主题相关图片如下：求助.jpg
钮，相关的其他信息可以显示在相应的位置上，您看我应该怎么操作呢？
此主题相关图片如下：求助.jpg钮，相关的其他信息可以显示在相应的位置上，您看我应该怎么操作呢？
-- 发布时间：2017/10/19 17:19:00
--
1、没有进行页面设置指什么？无效？
2、你可以用跨表查询的方法，如 http://www.foxtable.com/webhelp/scr/1451.htm
-- 发布时间：2017/10/19 17:25:00
--
嘿嘿，第一个问题已经解决了呢。
-- 发布时间：2017/10/20 17:26:00
--
您好，我按您的提示试着做了下，没有成功是不是因为从窗口里查询和跨表查询有所不同啊。您在费心给看看。
此主题相关图片如下：求助.jpg
-- 发布时间：2017/10/20 18:15:00
--
你窗口各个控件绑定列了吗？试试用 findrow和position
http://www.foxtable.com/webhelp/scr/0553.htm