https://barnamenevis.org/showpo...8&postcount=65


 Public Enum Days

        Sat = 1

        Sun

        Mon

        Tue

        Wed

        Thu

        Fri

    End Enum



    Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click



        Dim x As Integer = Days.Mon

    End Sub