Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Dim a As Object = Me.AccessibilityObject End Sub End Class