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