Form.BorderStyle 属性为0时,Form_GotFocus 和 Form_LostFocus 没有反应,怎么解决?
tlz 2003-12-25 11:25:20 '这两部分都没有反应,窗体没有标题栏,该怎样达到效果呀?
Private Sub Form_GotFocus()
'颜色变灰
Label1.ForeColor = &H8000000F
End Sub
'--------------------------------------------
Private Sub Form_LostFocus()
'颜色变黑
Label1.ForeColor = &H0&
End Sub