Люди добрые, помогите кто знает.
Для лучшей дружелюбности формы, границу активного поля крашу иным цветом, а когда оно становиться пассивным цвет границы становится обычной. Чтобы действие не прописывать для каждого поля в отдельности использую подпрограмму. Как в эту подпрограмму прописать чтобы заодно менялся цвет текста подписи активного поля (например: Подпись_Имя)

Private Sub Имя_Enter()
Активный
End Sub

Private Sub Имя_Exit(Cancel As Integer)
Пассивный
End Sub

Sub Активный()
Me.ActiveControl.Properties("BorderColor") = 800
End Sub

Sub Пассивный()
Me.ActiveControl.Properties("BorderColor") = 0
End Sub

http://www.sql.ru/forum/1120082/vizualnoe-vydelenie-aktivnogo-polya-formy