C# Online Compiler | .NET Fiddle

<no name> by Anonymous

Imports System
				
Public Module Module1
	Public Sub Main()
		Dim attempt as Integer = 0
		Dim guess As String
		Do
			Console.WriteLine("What colour tie is Mr Gowen wearing today?")
			guess = Console.ReadLine()
			attempt = attempt + 1
		Loop Until attempt = 3 or guess = "red"
		If guess.ToLower() = "red" Then
			Console.WriteLine("Well done, you are observant!")
		Else
			Console.WriteLine("You ran out of attempts!")
		End If
	End Sub
End Module

 
Imports System
                
Public Module Module1
    Public Sub Main()
        Dim attempt as Integer = 0
        Dim guess As String
        Do
            Console.WriteLine("What colour tie is Mr Gowen wearing today?")
            guess = Console.ReadLine()
            attempt = attempt + 1
        Loop Until attempt = 3 or guess = "red"
        If guess.ToLower() = "red" Then
            Console.WriteLine("Well done, you are observant!")
        Else
            Console.WriteLine("You ran out of attempts!")
        End If
    End Sub
End Module

Unhandled exception. System.Net.Sockets.SocketException (00000005, 0xFFFDFFFF): Name or service not known
   at System.Net.Dns.GetHostEntryOrAddressesCore(String hostName, Boolean justAddresses, AddressFamily addressFamily, Nullable`1 activityOrDefault)
   at System.Net.Dns.GetHostAddresses(String hostNameOrAddress, AddressFamily family)
   at Npgsql.NpgsqlConnector.Connect(NpgsqlTimeout timeout) in C:\projects\npgsql\src\Npgsql\NpgsqlConnector.cs:line 634
   at Npgsql.NpgsqlConnector.RawOpen(NpgsqlTimeout timeout, Boolean async, CancellationToken cancellationToken) in C:\projects\npgsql\src\Npgsql\NpgsqlConnector.cs:line 517
   at Npgsql.NpgsqlConnector.Open(NpgsqlTimeout timeout, Boolean async, CancellationToken cancellationToken) in C:\projects\npgsql\src\Npgsql\NpgsqlConnector.cs:line 381
   at Npgsql.ConnectorPool.AllocateLong(NpgsqlConnection conn, NpgsqlTimeout timeout, Boolean async, CancellationToken cancellationToken) in C:\projects\npgsql\src\Npgsql\ConnectorPool.cs:line 241
   at Npgsql.NpgsqlConnection.<>c__DisplayClass32_0.<<Open>g__OpenLong|0>d.MoveNext() in C:\projects\npgsql\src\Npgsql\NpgsqlConnection.cs:line 269
--- End of stack trace from previous location ---
   at Npgsql.NpgsqlConnection.Open() in C:\projects\npgsql\src\Npgsql\NpgsqlConnection.cs:line 119
   at Program.Main()
Command terminated by signal 6

Last Run:	2:46:43 am
Compile:	0.402s
Execute:	0.25s
Memory:	18.84Mb
CPU:	0.652s

View IL Code