Simple spinner for console app on long operations, providing viaul feedback.

ConsoleSpinner.cs

Public Class ConsoleSpinner
    Private counter As Integer

    Public Sub New()
        counter = 0
    End Sub

    Public Sub Turn(userText As String)

        counter += 1
        Dim cursor As String = ""

        Select Case counter Mod 4
            Case 0
                cursor = "/"
            Case 1
                cursor = "-"
            Case 2
                cursor = "\"
            Case 3
                cursor = "|"
        End Select

        ''adding 20 characters to overwrite any name
        Dim buffer As String = "                    "
        Dim contentLength = cursor.Length + userText.Length + counter.ToString().Length + 22
        Console.Write(String.Format("{0} {1} {2}{3}", counter, cursor, userText, buffer))
        Console.SetCursorPosition(Console.CursorLeft - contentLength, Console.CursorTop)
    
    End Sub
End Class