Public Enum MyEnum
FirstThing
SecondThing
AnotherThing
End Enum
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim s As String
For Each s In [Enum].GetNames(GetType(MyEnum))
ComboBox1.Items.Add(s)
Next
End Sub
Public Enum styles
br = 7
jpd = 9
End Enum
Public Class Form1
Inherits System.Windows.Forms.Form
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ComboBox1.Items.AddRange(styles.GetValues(Type.GetType("Styles")))
End Sub
End Class