Imports System
Public Class Test
Public Shared Function Virgula(ByVal ParamArray args() AS String) as String
Virgula = Join(args, ",")
End Function
Public Shared Sub Main()
Console.Write( Virgula("a","b","c","d") )
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KCgoKUHVibGljIENsYXNzIFRlc3QKICAgIFB1YmxpYyBTaGFyZWQgRnVuY3Rpb24gVmlyZ3VsYShCeVZhbCBQYXJhbUFycmF5IGFyZ3MoKSBBUyBTdHJpbmcpIGFzIFN0cmluZwogICAgICAgIFZpcmd1bGEgPSBKb2luKGFyZ3MsICIsIikKICAgIEVuZCBGdW5jdGlvbiAKICAgIAoJUHVibGljIFNoYXJlZCBTdWIgTWFpbigpCgkgICAgQ29uc29sZS5Xcml0ZSggIFZpcmd1bGEoImEiLCJiIiwiYyIsImQiKSAgKQoJRW5kIFN1YgpFbmQgQ2xhc3M=