Access 2000报告 - 备用行颜色

时间:2012-03-28 13:17:14

标签: vba ms-access access-vba

我在我的新工作中继承了MS Access数据库。我对Access不太了解,他们问我是否可以将报告的每一行都变成不同的颜色,以便更容易阅读。有一个简单的方法吗?

1 个答案:

答案 0 :(得分:4)

这很容易做到。我发现这样做的最简单方法是使用以下代码:

Option Explicit
Dim ColorDetail As Boolean

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
   If ColorDetail Then
      Detail.BackColor = 16777215
   Else
      Detail.BackColor = 13290186
   End If
   ColorDetail = Not (ColorDetail)
End Sub