VB.Net/Data Structure/Array Preserve
Preserve an Array
<source lang="vbnet"> Imports System Public Class MainClass
Shared Sub Main(ByVal args As String()) Dim friends() As String = {"A", "B", "C","D", "E"} " make friends bigger! ReDim Preserve friends(6) friends(5) = "F" friends(6) = "G"
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
</source>