Visual Basic .NET Example

Private Sub CaptureFullText(ByVal x As Integer, ByVal y As Integer)
        Dim spUIC As IUIControl = New UIControl
        Dim strRes As String

        spUIC.CreateFromScreenPoint(x, y)

        strRes = spUIC.Value
        If (strRes = String.Empty) Then
            strRes = spUIC.Name
        End If
        clickedWordTxt.Text = strRes
 End Sub

Comments