The following code sets the focus rectangle for the active cell to a light rectangle using the constant value.
Sub Form1_Load () ModHFGrid1.FocusRect = flexFocusLight End Sub