Mega Code Archive

 

Categories / VB.Net / Language Basics

 

Pass Array as Parameters

Imports System Public Class MainClass     Shared Sub Main(ByVal args As String())         Dim friends() As String = {"A", "B", "C","D", "E"}         AddFriendsToList(friends)     End Sub          Shared Sub AddFriendsToList(ByVal friends() As String)         Dim friendName As String                  For Each friendName In friends             Console.WriteLine("[" & friendName & "]")         Next     End Sub End Class