我有一个包含300多个控件的未绑定表单,它从订单上的订单项中提取数据(通过reccordset)并进行计算以计算不同的产品。可以在此表单上计算多个宽度为1,2,3等的产品,然后在VBA中对其进行编程,以便在设置文本框值时将更改值的背景颜色设置为vbGreen,以便用户可以很容易地看到发生了什么变化。
我的框中正在填充值,但绿色背景仅在您单击框
时显示If Double20 <> 0 Then
Me.Double20.Value = Double20
Me.Double20.BackColor = VbGreen
End If
Double20是持有计数的变量(是的,我确实尝试更改变量名以检查冲突)
任何想法?
编辑:我也试过明确地引用它
Forms![DWO Creator Form]![Double20].BackColor = vbRed
并将其更改为红色(但仅在点击后)
答案 0 :(得分:2)
您的所有文本框都有透明背景。
您需要在设计视图中将其设置为“正常”,或添加
Me.Double20.BackStyle = 1
设置.BackColor
时。
回想起来,这应该是显而易见的 - 只有当他们拥有焦点时才显示他们的背景颜色的控制正是透明背景的行为......