I can't believe it. This is the second time this evening I didn't read
the question carefully enough. You wanted to change the border color,
not the back color.

Here you go . . .
With Lbl
..Top = Y
..Left = X - 6
..Height = 1
..Width = 12
..BorderStyle = 1
..BorderColor = vbRed


Sorry for the confusion.