Changing Custom Control Property

How can I make a property change value of another property at design time? I
have added HighlightRow property to custom DataGrid control. Now I want to
assign this property similar to DataGrid’s ReadOnly property. For instance,
when in property window ReadOnly property is set to True, the HighlightRow
property should be set to true and vice-versa. I did something like this does
not seems to work

Public Shadows Property [ReadOnly]() As Boolean
Get
Return m_blnReadOnly
End Get
Set(ByVal Value As Boolean)
m_blnReadOnly = Value

If Value Then
Me.HighlightRow = True
Else
Me.HighlightRow = False
End If

End Set
End Property

<Browsable(True), Description("Determines whether to highlight current row
when ReadOnly property is set to True. By default set to False."),
DefaultValue(False)> _
Public Property HighlightRow() As Boolean
Get
Return m_blnHighlightRow
End Get
Set(ByVal Value As Boolean)
m_blnHighlightRow = Value
End Set
End Property

Thanks