Find Zodiac sign using Date of Birth in Windows Application using C# and VB.Net

Hi somebodyy,

Refer below code.

C#

public partial class Form2 : Form
{
    public Form2()
    {
        InitializeComponent();
    }

    private void btnZodiacSign_Click(object sender, EventArgs e)
    {
        DateTime date = Convert.ToDateTime(dateTimePicker1.Value);
        string sign = Findzodiac(date.ToString("MMM"), Convert.ToInt32(date.Day));
        string message = string.Format("{0} your zodiac sign is {1}", txtName.Text.Trim(), sign);
        MessageBox.Show(message);
    }

    private string Findzodiac(string month, int day)
    {
        string sign = string.Empty;
        if (((month == "Mar") && (day >= 21 || day <= 31)) || ((month == "Apr") && (day >= 01 || day <= 20)))
        {
            sign = "Aires";
        }
        if (((month == "Apr") && (day >= 21 || day <= 31)) || ((month == "May") && (day >= 01 || day <= 21)))
        {
            sign = "Taurus";
        }
        if (((month == "May") && (day >= 21 || day <= 31)) || ((month == "Jun") && (day >= 01 || day <= 21)))
        {
            sign = "Gemini";
        }
        if (((month == "Jun") && (day >= 22 || day <= 31)) || ((month == "Jul") && (day >= 01 || day <= 22)))
        {
            sign = "Cancer";
        }
        if (((month == "Jul") && (day >= 23 || day <= 31)) || ((month == "Aug") && (day >= 01 || day <= 22)))
        {
            sign = "leo";
        }
        if (((month == "Aug") && (day >= 23 || day <= 31)) || ((month == "Sep") && (day >= 01 || day <= 21)))
        {
            sign = "Virgo";
        }
        // In the same way you do for others.

        return sign;
    }
}

VB.Net

Public Partial Class Form2

    Public Sub New()
        InitializeComponent()
    End Sub

    Private Sub btnZodiacSign_Click(ByVal sender As Object, ByVal e As EventArgs)
        Dim date As DateTime = Convert.ToDateTime(dateTimePicker1.Value)
        Dim sign As String = Findzodiac(date.ToString("MMM"), Convert.ToInt32(date.Day))
        Dim message As String = String.Format("{0} your zodiac sign is {1}", txtName.Text.Trim(), sign)
        MessageBox.Show(message)
    End Sub

    Private Function Findzodiac(ByVal month As String, ByVal day As Integer) As String
        Dim sign As String = String.Empty

        If ((month = "Mar") AndAlso (day >= 21 OrElse day <= 31)) OrElse ((month = "Apr") AndAlso (day >= 01 OrElse day <= 20)) Then
            sign = "Aires"
        End If

        If ((month = "Apr") AndAlso (day >= 21 OrElse day <= 31)) OrElse ((month = "May") AndAlso (day >= 01 OrElse day <= 21)) Then
            sign = "Taurus"
        End If

        If ((month = "May") AndAlso (day >= 21 OrElse day <= 31)) OrElse ((month = "Jun") AndAlso (day >= 01 OrElse day <= 21)) Then
            sign = "Gemini"
        End If

        If ((month = "Jun") AndAlso (day >= 22 OrElse day <= 31)) OrElse ((month = "Jul") AndAlso (day >= 01 OrElse day <= 22)) Then
            sign = "Cancer"
        End If

        If ((month = "Jul") AndAlso (day >= 23 OrElse day <= 31)) OrElse ((month = "Aug") AndAlso (day >= 01 OrElse day <= 22)) Then
            sign = "leo"
        End If

        If ((month = "Aug") AndAlso (day >= 23 OrElse day <= 31)) OrElse ((month = "Sep") AndAlso (day >= 01 OrElse day <= 21)) Then
            sign = "Virgo"
        End If
        ' In the same way you do for others.

        Return sign
    End Function
End Class

Screenshot