CellFontUnderline Property Example

The following code sets the text of the current cell to Underline whenever the MSHFlexGrid is in focus.

Note   If you are using the MSFlexGrid, substitute "MSHFlexGrid1" with "MSFlexGrid1."

Sub MSHFlexGrid1_GotFocus 
   MSHFlexGrid1.CellFontUnderline =1
End Sub