'Declaration
Function ExtendSelection( _
ByVal As Integer, _
ByVal extendColumn As Integer _
) As Boolean
'使用法
Dim instance As INotifySelectionChanged
Dim extendRow As Integer
Dim extendColumn As Integer
Dim value As Boolean
value = instance.ExtendSelection(extendRow, extendColumn)