Question

How to print text diagonally from left to right recursively in VB.NET

Answer 1

Imports System

Module Module1

    Sub printTextDiagonallyRecursivelyLTR(spaces As String, text As String)
        If text.Length > 0 Then
            Console.WriteLine(spaces & text(0))
            printTextDiagonallyRecursivelyLTR(spaces & " ", text.Substring(1))
        End If
    End Sub

    Sub Main()
        printTextDiagonallyRecursivelyLTR("", "HELLO WORLD")
    End Sub

End Module



' run:
'
' H
'  E
'   L
'    L
'     O
'       
'       W
'        O
'         R
'          L
'           D
'

 

70+ SQL courses for beginners and professionals