Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        For hoge As Hoge = hoge.A To hoge.C

            Me.ComboBox1.Items.Add(hoge)

        Next

    End Sub



    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

        Dim X As Integer = Me.ComboBox1.SelectedItem * 10

        Me.Label1.Text = "X = " + X.ToString()

    End Sub

End Class



Enum Hoge

    A = 1

    B

    C

End Enum