Question

这真的不应该很难，我只是想不通怎么做。

我正在制作一份需要在其周围设置边框的提案报告。问题是在侧面得到垂直线。我无法弄清楚如何根据细节部分的高度来增加和缩小线条。

我使用过Crystal报告，并且肯定希望Microsoft能够学习一些关于MS Access报告编写的内容！

我对VBA很满意，所以不用担心。

Answer 1

你是对的，这不是那么难。诀窍是使用2个变量，top和bottom。在PageHeader_Format事件中，您将顶部设置为Me.Height，并在PageFooter_Format事件中将底部设置为Me.Top - correction，其中校正是用于修复正确长度的固定值。我不知道这个数额来自哪里，你只需要尝试一下。

在Report_Page事件中，您可以从上到下绘制线条。

Answer 2

没有人提到的另一种方法是使用报告的Line方法，在Knowledge Base article 210321中概述。我已经使用了这个多年，它可以用来绘制线条和矩形。对于发票明细具有可变高度子报表的发票非常方便，但需要根据主报表详细信息的高度更改垂直线。

Answer 3

不需要VBA。

制作一个每个细节都独一无二的虚拟分组。对于该分组，将页脚设置为是。
在刚刚创建的新组页脚部分中，添加您的行。
在您的详细信息部分中，选择可以增长并设置的所有相关字段可以增长=是
完成！

修改

偏离主题，我同意Access Reports可以从Crystal学到一两课。但水晶也不完美。 [/ flamewar]

Answer 4

试试这个。

右键单击详细信息栏并选择属性。将特殊效果设置为“凹陷”。这将在细节部分周围放置一些边框，并使用细节部分调整大小。

我试图获得一条线来动态调整大小但它的捕获22，当你知道该部分的高度时（在On Print事件中）你不能做任何改变！

Answer 5

使用与me.line和scaleheight / scalewidth结合的页面事件。我在整个页面周围画了一个方框，内容如下。玩它，看看你最终到了哪里。制作专业报告非常方便。如果您想在报表上的某个位置使用线条，则可以使用控件坐标。喜欢

me.line(Mycontrol.left,mycontrol.top) - (myothercontrol.left+myothercontrol.width, myother control.top + myothercontrol.height)

Private Sub Report_Page()

Me.Line (0, 0)-(scalewidth -30, scaleheight-30), 0, B

End Sub

MS Access围绕可以增长的细节部分绘制线条

5 个答案:

修改