Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
VBA UI文本框背景变为黑色_Vba_User Interface_Background_Textbox_Controls - Fatal编程技术网

VBA UI文本框背景变为黑色

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

我有一系列带UI的Excel VBA项目,从来没有遇到过任何问题。我们现在已经迁移到Windows 7,一些用户注意到,通过选择单选按钮选择控件时,文本框控件背景将呈现为黑色

今天,在重新启动我的电脑后,同样的事情发生了。这是激活文本框的单选按钮事件的代码

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。

谢谢您的回答。我在寻找的是,如果有人有过类似的经历,在多年没有问题之后,事情突然无缘无故地发生了变化。