'Declaration Protected Read Property SelectionEnd As Integer
Dim selectionEnd As Integer = textComponent.SelectionEnd