我有一个包含文本框“Text20”的表单。我在表单的OnCurrent事件中放了一些代码:
Option Compare Database
Private Sub Form_Current()
Text20.BackColor = vbRed
End Sub
当我显示表单时它什么都不做,而它应该为我的文本框着色。你知道为什么吗?
谢谢
答案 0 :(得分:0)
在后面的代码中没有理由这样做。只需右键单击该控件,选择条件格式并应用格式并为其指定条件和格式。
无需代码。
事实上,您的示例中包含的代码会在每次表单更改记录时重新设置,无论如何都是过度杀伤。
更好。为什么不在控件的属性表中设置颜色?