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