当标签获得焦点后，相应标签显示对应“使用”内容

Grant

你指的是表1窗体中的字段 情况 文本框内容为使用的时候 表1窗体标签显示红色?还是把窗体1的标签改为红色?

如果是表1窗体中情况字段标签变色
表1窗体中加入代码

Private Sub Form_Current()
    If 情况 = "使用" Then
        Me.情况_Label.BackStyle = 1
        情况_Label.BackColor = 255
    Else
        Me.情况_Label.BackStyle = 0
    End If
End Sub

如果是窗体1中的标签改为红色需要用一个循环来解决

Grant

Henry D. Sy 发表于 2012-1-4 09:09

6D版主给搞定了