在Access中，可以使用VBA代码来设置控件的颜色属性。下面是一些示例代码来演示如何设置前景色和背景色：
1. 设置文本框的前景色：
```
Me.TextBox.ForeColor = RGB(255, 0, 0) '将前景色设置为红色
```
2. 设置文本框的背景色：
```
Me.TextBox.BackColor = RGB(0, 255, 0) '将背景色设置为绿色
```
3. 根据条件设置文本框的颜色：
```
If Me.TextBox.Value > 10 Then
Me.TextBox.ForeColor = RGB(255, 0, 0) '将前景色设置为红色
Else
Me.TextBox.ForeColor = RGB(0, 0, 255) '将前景色设置为蓝色
End If
```
除了文本框，你也可以通过类似的方式设置其他控件的颜色属性，例如标签、按钮等。通过使用RGB函数，你可以指定任意的颜色组合。RGB函数接受三个参数，分别是红色、绿色和蓝色的值，取值范围是0到255。
希望这些示例代码能够帮助你设置Access中的颜色代码。如果你有其他相关问题，请随时提问。
