access设置文本框背景颜色及颜色常量列表

2018-03-10 08:37:00
黄善超
原创
1492

在access中,设置字体或者背景颜色都是非常方便的。可直接在功能菜单上设置


也可以用VBA代码动态设置字体颜色和背景颜色。如设置文本框的字体颜色和背景颜色:如下图所示



详细代码:

Private Sub Text0_GotFocus()
    Me.Text0 = "Office交流网"
    Me.Text0.BackColor = vbRed
    Me.Text0.ForeColor = vbYellow    
End Sub

Private Sub Text0_LostFocus()
    Me.Text0.BackColor = vbWhite
    Me.Text0.ForeColor = vbBlack
End Sub



点击文本框改变背景颜色和字体颜色



附颜色常数列表:

可在代码中的任何地方用下列常数代替实际值:

常数 描述
vbBlack 0x0 黑色
vbRed 0xFF 红色
vbGreen 0xFF00 绿色
vbYellow 0xFFFF 黄色
vbBlue 0xFF0000 蓝色
vbMagenta 0xFF00FF 紫红色
vbCyan 0xFFFF00 青色
vbWhite 0xFFFFFF 白色
    分享