Office中国论坛/Access中国论坛

标题: 报表画线和自适应页面补空行方法示例 [打印本页]

---

作者: t小宝    时间: 2010-9-30 21:55
标题: 报表画线和自适应页面补空行方法示例
此例改自红尘如烟的报表补空行例子，可不指定每页行数，自动将空行补满页面，预览时改变页面设置后也可自动调整空行数，适应页面。

---

作者: t小宝    时间: 2010-9-30 21:59
解决此悬赏题，但悬赏还是留给有人做出不同的例子
http://www.office-cn.net/thread-93216-1-4.html

---

作者: xulanghui    时间: 2010-9-30 22:08
正好需要，谢谢！

---

作者: xulanghui    时间: 2010-9-30 22:51
也有个问题，画的线是最细的那种，能不能自定义线的粗细呢？
另就是我只要外框的线粗些，里面画线细些呢？

---

作者: xulanghui    时间: 2010-10-1 07:11
今早又发现一个问题，遇到某行字数较多自动换行时，画线就乱了。

---

作者: t小宝    时间: 2010-10-1 09:35

也有个问题，画的线是最细的那种，能不能自定义线的粗细呢？
另就是我只要外框的线粗些，里面画线细些呢？
xulanghui 发表于 2010-9-30 22:51

这个可以实现，自己改下代码

今早又发现一个问题，遇到某行字数较多自动换行时，画线就乱了。
xulanghui 发表于 2010-10-1 07:11

确实，此例要求主体节的行高都是一样的，须把主体节上的控件的可以扩大和可以缩小属性设为否。
如果行高不固定，似乎没有必要补空行，因为空行的行高是固定的，这样反而不美观。

---

作者: todaynew    时间: 2010-10-1 09:36

此例改自红尘如烟的报表补空行例子，可不指定每页行数，自动将空行补满页面，预览时改变页面设置后也可自动 ...
t小宝 发表于 2010-9-30 21:55

支持问题讨论，学习多种方法。

---

作者: ui    时间: 2010-10-1 10:40
谢谢分享

---

作者: 红尘如烟    时间: 2010-10-1 15:39
不错，比我原来的方法完善了很多，尤其是ScaleWidth和ScaleHeight这两个属性我还真没想到过，运用的很巧妙，比我原来的笨办法好多了

---

作者: ycxchen    时间: 2010-10-3 15:43
5的问题如何改代码？我不懂，请版主指教！

---

作者: xulanghui    时间: 2010-10-4 20:39
5的问题如何改代码？我不懂，请版主指教！

---

作者: t小宝    时间: 2010-10-7 14:11
回复 ycxchen 的帖子

不是说了吗
须把主体节上的控件的可以扩大和可以缩小属性设为否。

   

---

作者: ycxchen    时间: 2010-10-8 09:27
谢谢指点！

---

作者: ycxchen    时间: 2010-10-8 09:41
版主，不好意思，我学习了例子后发觉我说错了，我不懂的是4楼的问题，即自定义线条粗细问题，如何改代码？

---

作者: t小宝    时间: 2010-10-8 23:13
线条粗细...
有空再补充一下

---

作者: ycxchen    时间: 2010-10-9 08:44
期待版主补充！

---

作者: t小宝    时间: 2010-10-10 20:16
回复 ycxchen 的帖子
在例子中的ReportSheet函数过程的最后添加以下2行代码可实现外框加粗，DrawWidth 属性决定线条粗细，可自行调节。

    rpt.DrawWidth = 16
    rpt.Line (lngLeft, lngTop)-(lngRight, lngBottom), , B

---

作者: li08hua    时间: 2010-10-11 00:27
小宝很有心，确实实用了许多！谢谢

---

作者: 石三少    时间: 2010-10-11 08:52
真正好东西，正好需要，支持！

---

作者: ycxchen    时间: 2010-10-11 09:33
万分感谢小宝版主指教！

---

作者: ElfK    时间: 2010-10-20 10:59
都有用处,收藏,谢谢!

---

作者: girder    时间: 2010-10-28 13:27
有用的 收藏一下 报表格式设置蛮烦的。。。。。。。。。。

---

作者: girder    时间: 2010-10-28 14:19
学习一下，收藏了。。。。。。。。。。。

---

作者: zx994398    时间: 2010-10-29 09:47
收藏啊，好贴，支持中，学习中……

---

作者: simonwong    时间: 2011-6-14 14:13
版主,请教如果想用点虚线,应该怎样设置,因为针式打印机打点线比较快.

---

作者: simonwong    时间: 2011-6-14 15:35
在谷歌找到了
.DrawStyle = 2

---

作者: huangli0356    时间: 2011-8-11 23:50
正努力学习中

---

作者: yanghua1900363    时间: 2011-8-12 08:28
感谢分享

---

作者: tzh16000    时间: 2011-9-8 16:30
很好用,要是能对visibale=false控件不画线就更好了
不过问题不大,我把visibale=false控件设置成左边距与其他控件重合,宽度为0也是一样的

---

作者: huxinhua    时间: 2012-1-10 17:29
正好需要，谢谢！

---

作者: fxbianxiu    时间: 2013-1-8 10:32
真是好东西
但我在实际应用中，想在分组时显示，我想应该是改上、下边距就可以，但下边距改过了不起做用呢

---

作者: xie62    时间: 2013-1-8 13:24
感谢分享

---

作者: wuaza    时间: 2014-2-3 09:19
http://access911.net/fixhtm/74FAB31E11DC.htm?tt=
access911网站的这个示例很有参考价值。

---

作者: zpy2    时间: 2014-6-26 07:28
谢谢啦！！！

---

作者: lfz9    时间: 2015-7-16 19:23
好好学习了

---

作者: purplerose    时间: 2015-7-22 10:04
小宝  谢谢您的例子{:soso_e100:}{:soso_e160:}

---

作者: purplerose    时间: 2015-7-22 10:07

红尘如烟 发表于 2010-10-1 15:39
不错，比我原来的方法完善了很多，尤其是ScaleWidth和ScaleHeight这两个属性我还真没想到过，运用的很巧妙 ...

您好！早点耳闻您的大名 ，只是难识庐山真面目哟

---

作者: newglord    时间: 2016-4-7 16:46
红   强大，下了

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3