VBA UI文本框背景变为黑色
我有一系列带UI的Excel VBA项目,从来没有遇到过任何问题。我们现在已经迁移到Windows 7,一些用户注意到,通过选择单选按钮选择控件时,文本框控件背景将呈现为黑色 今天,在重新启动我的电脑后,同样的事情发生了。这是激活文本框的单选按钮事件的代码VBA UI文本框背景变为黑色,vba,user-interface,background,textbox,controls,Vba,User Interface,Background,Textbox,Controls,我有一系列带UI的Excel VBA项目,从来没有遇到过任何问题。我们现在已经迁移到Windows 7,一些用户注意到,通过选择单选按钮选择控件时,文本框控件背景将呈现为黑色 今天,在重新启动我的电脑后,同样的事情发生了。这是激活文本框的单选按钮事件的代码 Private Sub optUserInput_Click() With frmBOMReport.txtPN .Enabled = True .Locked = False .BackColor = &H
Private Sub optUserInput_Click()
With frmBOMReport.txtPN
.Enabled = True
.Locked = False
.BackColor = &H80000009 'White Background
End With
默认值为&h8000005&
有没有人经历过这种情况?如果有,这里发生了什么
提前感谢您对此的回复。
卡洛选项1
使用RGB函数
Private Sub optUserInput_Click()
With frmBOMReport.txtPN
.Enabled = True
.Locked = False
.BackColor = RGB(255,255,255) 'White Background
End With
&H80000009是一个VB常量,表示标题中文本的颜色。因此,如果文本为黑色,则代码将使控件的背景色变黑
选择2
使用&HFFFFFF const,这是白色的实际VB const。谢谢您的回答。我在寻找的是,如果有人有过类似的经历,在多年没有问题之后,事情突然无缘无故地发生了变化。