Sure:
Code:Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim properties() As System.Reflection.PropertyInfo = GetType(System.Drawing.Color).GetProperties _ (Reflection.BindingFlags.Public Or Reflection.BindingFlags.Static) Dim color As System.Reflection.PropertyInfo For Each color In properties ListBox1.Items.Add(color.Name()) Next End Sub




Reply With Quote