C# Online Compiler | .NET Fiddle

<no name> by Anonymous

Imports System
				
Public Module Module1
	Public Sub Main()
		do
		Dim month, day As String
			Console.Write("Enter month of birth or month: ")
        month = Console.ReadLine()

        Console.Write("Enter day of birth : ")
      day = Console.ReadLine()


        Dim sign As String = ""
        Select Case month
            Case 1
                 If day >= 20 Then
                    Console.WriteLine("Aquarius")
                Else
                    Console.WriteLine("Capricorn")
                End If
			  Case "January"
                If day >= 20 Then
                    Console.WriteLine("Aquarius")
                Else
                    Console.WriteLine("Capricorn")
                End If
            Case 2
                If day >= 19 Then
                    Console.WriteLine("Pisces")
                Else
                    Console.WriteLine("Aquarius")
                End If
			 Case "February"
                If day >= 19 Then
                    Console.WriteLine("Pisces")
                Else
                    Console.WriteLine("Aquarius")
                End If
            Case 3
                 If day >= 21 Then
                    Console.WriteLine("Aries")
                Else
                    Console.WriteLine("Pisces")
                End If
			
			 Case "March"
                If day >= 21 Then
                    Console.WriteLine("Aries")
                Else
                    Console.WriteLine("Pisces")
                End If
			  Case 4
                 If day >= 20 Then
                    Console.WriteLine("Taurus")
                Else
                    Console.WriteLine("Aries")
                End If
			  Case "April"
                If day >= 20 Then
                    Console.WriteLine("Taurus")
                Else
                    Console.WriteLine("Aries")
                End If
			  Case 5
               If day >= 21 Then
                    Console.WriteLine("Gemini")
                Else
                    Console.WriteLine("Taurus")
                End If
			   Case "May"
                If day >= 21 Then
                    Console.WriteLine("Gemini")
                Else
                    Console.WriteLine("Taurus")
                End If
			  Case 6
                  If day >= 21 Then
                    Console.WriteLine("Cancer")
                Else
                    Console.WriteLine("Gemini")
                End If
			 Case "June"
                If day >= 21 Then
                    Console.WriteLine("Cancer")
                Else
                    Console.WriteLine("Gemini")
                End If
			  Case 7
                If day >= 23 Then
                    Console.WriteLine("Leo")
                Else
                    Console.WriteLine("Cancer")
                End If
			  Case "July"
                If day >= 23 Then
                    Console.WriteLine("Leo")
                Else
                    Console.WriteLine("Cancer")
                End If
			  Case 8
                  If day >= 23 Then
                    Console.WriteLine("Virgo")
                Else
                    Console.WriteLine("Leo")
                End If
			 Case "August"
                If day >= 23 Then
                    Console.WriteLine("Virgo")
                Else
                    Console.WriteLine("Leo")
                End If
			  Case 9
                 If day >= 23 Then
                    Console.WriteLine("Libra")
                Else
                    Console.WriteLine("Virgo")
                End If
			  Case "September"
                If day >= 23 Then
                    Console.WriteLine("Libra")
                Else
                    Console.WriteLine("Virgo")
                End If
			  Case 10
                   If day >= 23 Then
                    Console.WriteLine("Scorpio")
                Else
                    Console.WriteLine("Libra")
                End If
			 Case "October"
                If day >= 23 Then
                    Console.WriteLine("Scorpio")
                Else
                    Console.WriteLine("Libra")
                End If
			  Case 11
                 If day >= 22 Then
                    Console.WriteLine("Sagittarius")
                Else
                    Console.WriteLine("Scorpio")
                End If
			   Case "November"
                If day >= 22 Then
                    Console.WriteLine("Sagittarius")
                Else
                    Console.WriteLine("Scorpio")
                End If
			  Case 12
                 If day >= 22 Then
                    Console.WriteLine("Capricorn")
                Else
                    Console.WriteLine("Sagittarius")
                End If
		  Case "December" 
                If day >= 22 Then
                    Console.WriteLine("Capricorn")
                Else
                    Console.WriteLine("Sagittarius")
                End If
            ' Add more cases for other months
            Case Else
                Console.WriteLine("Invalid month.")
        End Select

        If sign <> "" Then
            Console.WriteLine($"Your zodiac sign is {sign}.")
        End If
		Console.ReadLine()
	loop
    End Sub
End Module

​x
 
Imports System
                
Public Module Module1
    Public Sub Main()
        do
        Dim month, day As String
            Console.Write("Enter month of birth or month: ")
        month = Console.ReadLine()
​
        Console.Write("Enter day of birth : ")
      day = Console.ReadLine()
​
​
        Dim sign As String = ""
        Select Case month
            Case 1
                 If day >= 20 Then
                    Console.WriteLine("Aquarius")
                Else
                    Console.WriteLine("Capricorn")
                End If
              Case "January"
                If day >= 20 Then
                    Console.WriteLine("Aquarius")
                Else
                    Console.WriteLine("Capricorn")
                End If
            Case 2
                If day >= 19 Then
                    Console.WriteLine("Pisces")
                Else
                    Console.WriteLine("Aquarius")
                End If
             Case "February"
                If day >= 19 Then
                    Console.WriteLine("Pisces")
                Else
                    Console.WriteLine("Aquarius")
                End If
            Case 3
                 If day >= 21 Then
                    Console.WriteLine("Aries")
                Else
                    Console.WriteLine("Pisces")
                End If
            
             Case "March"
                If day >= 21 Then
                    Console.WriteLine("Aries")
                Else
                    Console.WriteLine("Pisces")
                End If
              Case 4
                 If day >= 20 Then
                    Console.WriteLine("Taurus")
                Else
                    Console.WriteLine("Aries")
                End If
              Case "April"
                If day >= 20 Then
                    Console.WriteLine("Taurus")
                Else
                    Console.WriteLine("Aries")
                End If
              Case 5
               If day >= 21 Then
                    Console.WriteLine("Gemini")
                Else
                    Console.WriteLine("Taurus")
                End If
               Case "May"
                If day >= 21 Then
                    Console.WriteLine("Gemini")
                Else
                    Console.WriteLine("Taurus")
                End If
              Case 6
                  If day >= 21 Then
                    Console.WriteLine("Cancer")
                Else
                    Console.WriteLine("Gemini")
                End If
             Case "June"
                If day >= 21 Then
                    Console.WriteLine("Cancer")
                Else
                    Console.WriteLine("Gemini")
                End If
              Case 7
                If day >= 23 Then
                    Console.WriteLine("Leo")
                Else
                    Console.WriteLine("Cancer")
                End If
              Case "July"
                If day >= 23 Then
                    Console.WriteLine("Leo")
                Else
                    Console.WriteLine("Cancer")
                End If
              Case 8
                  If day >= 23 Then
                    Console.WriteLine("Virgo")
                Else
                    Console.WriteLine("Leo")
                End If
             Case "August"
                If day >= 23 Then
                    Console.WriteLine("Virgo")
                Else
                    Console.WriteLine("Leo")
                End If
              Case 9
                 If day >= 23 Then
                    Console.WriteLine("Libra")
                Else
                    Console.WriteLine("Virgo")
                End If
              Case "September"
                If day >= 23 Then
                    Console.WriteLine("Libra")
                Else
                    Console.WriteLine("Virgo")
                End If
              Case 10
                   If day >= 23 Then
                    Console.WriteLine("Scorpio")
                Else
                    Console.WriteLine("Libra")
                End If
             Case "October"
                If day >= 23 Then
                    Console.WriteLine("Scorpio")
                Else
                    Console.WriteLine("Libra")
                End If
              Case 11
                 If day >= 22 Then
                    Console.WriteLine("Sagittarius")
                Else
                    Console.WriteLine("Scorpio")
                End If
               Case "November"
                If day >= 22 Then
                    Console.WriteLine("Sagittarius")
                Else
                    Console.WriteLine("Scorpio")
                End If
              Case 12
                 If day >= 22 Then
                    Console.WriteLine("Capricorn")
                Else
                    Console.WriteLine("Sagittarius")
                End If
          Case "December" 
                If day >= 22 Then
                    Console.WriteLine("Capricorn")
                Else
                    Console.WriteLine("Sagittarius")
                End If
            ' Add more cases for other months
            Case Else
                Console.WriteLine("Invalid month.")
        End Select
​
        If sign <> "" Then
            Console.WriteLine($"Your zodiac sign is {sign}.")
        End If
        Console.ReadLine()
    loop
    End Sub
End Module

Hello World oıadjfnlandc

Last Run:	5:40:18 am
Compile:	0.138s
Execute:	0s
Memory:	0b
CPU:	0s

View IL Code