Question

How to create a sub with an optional parameter in VB.NET

Answer 1

Module Module1

    Sub Print(ByVal Optional s As String = "VB.NET")
        Console.WriteLine(s)
    End Sub

    Sub Main()

        Print()
        Print("C++")
        Print("Java")

    End Sub

End Module


' run:
' 
' VB.NET
' C++
' Java

 

70+ SQL courses for beginners and professionals

Answer 2

Module Module1

    Sub Print(ByVal Optional s As String = "VB.NET",
              ByVal Optional n As Integer = 99)
        Console.WriteLine($"{s} {n}")
    End Sub

    Sub Main()
        Print()
        Print("Java")
        Print("C#", 2)
        Print(s:="Python")
        Print("C++", n:=12)
        Print(n:=9834, s:="PHP")
        Print(n:=100)
    End Sub

End Module


' run:
' 
' VB.NET 99
' Java 99
' C# 2
' Python 99
' C++12
' PHP 9834
' VB.NET 100

 

70+ SQL courses for beginners and professionals