Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim RType As Type
Dim RObject As Object
Dim MyButtons As New Windows.Forms.Button()
RType = MyButtons.GetType()
For Each RObject In RType.GetMembers
LstDisplay.Items.Add(RObject.ToString())
Next
End Sub
End Class