显示每条记录颜色值的访问报告
Access Report Showing Each Records Color Value
我问过类似的问题 ,但现在我想创建一个报告,显示为每条记录输入的颜色值。我已经能够使用部分用于输入值的代码,但是当加载报告时,报告中的所有矩形都显示记录 1 中的颜色值,而不是每个矩形。
这用于输入值,有效:
Dim A As Variant
A = Split(Textbox1.text,",")
Box1.BackColor = RGB(Int(A(0)),Int(A(1)), Int(A(2)))
我将这段代码添加到报告中,关于当前的加载事件,但都没有用。也许代码需要转到另一个事件?
如何让报告显示每条记录的颜色?
您的代码必须进入 Details
部分的 On Format
事件。
请注意,仅当您在“打印”或“打印预览”视图中而不是在“报表视图”中打开报表时才会触发此事件。
我问过类似的问题
这用于输入值,有效:
Dim A As Variant
A = Split(Textbox1.text,",")
Box1.BackColor = RGB(Int(A(0)),Int(A(1)), Int(A(2)))
我将这段代码添加到报告中,关于当前的加载事件,但都没有用。也许代码需要转到另一个事件?
如何让报告显示每条记录的颜色?
您的代码必须进入 Details
部分的 On Format
事件。
请注意,仅当您在“打印”或“打印预览”视图中而不是在“报表视图”中打开报表时才会触发此事件。