以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  打印第一行没对齐  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=159952)

--  作者:18558628837
--  发布时间:2021/1/15 8:48:00
--  打印第一行没对齐

老师,你好!打印其他行是正常的,就第一行是往左移,是怎么回事呢?

 

 


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20210115084506.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2021/1/15 8:50:00
--  
什么方式打印的?效果截图看看
--  作者:18558628837
--  发布时间:2021/1/15 9:26:00
--  
forms("抽成结算明细经办人").Controls("table1").Table.setColVisibleWidth("qymc|154|zjbm|95|fwnr|61|ywly|79|fwzt|61|nbwb|100|skxm|112|ydlf|61|zj|49|jsr|61|jsrcc|53|jsrfs|53|qtr|61|qtrcc|49|yxbtgcc|53")
With forms("抽成结算明细经办人").Controls("table1").Table.PrintInfo
    .Title =  forms("抽成结算明细经办人").Controls("战将部门").value & forms("抽成结算明细经办人").Controls("结账年份").value & "年" &  forms("抽成结算明细经办人").Controls("结账月份").value  & "抽成结算明细经办人表"
    .PageFooter = "                                                                                                                          负责人签字:______________   "  & vbcrlf &  vbcrlf &  "                                                                                                                                                 年     月     日"
    .PageFooterLine = False
    .PaperKind = 9
    .FitIntoPage = True
    .LandScape = True
    .FitIntoPage =True
    .PageFooterLine=False
    .LeftMargin=10
    .TopMargin=8
    .RightMargin=10
    .BottomMargin=20
End With
forms("抽成结算明细经办人").Controls("table1").Table.Print(True,False)

--  作者:有点蓝
--  发布时间:2021/1/15 9:34:00
--  
我测试没有问题,是不是数据本身前面就有空格?做个例子发上来看看