Visual Basic 6 Example

        Dim spUIC As UIControl
        Set spUIC = New UIControl
       
        Call spUIC.CreateFromScreenPoint(x1, y1)
        TxtResult.Text = spUIC.value
        If (TxtResult.Text = "") Then
            TxtResult.Text = spUIC.Name
        End If
Comments