Mr.Tです、こんにちは。
こことか、こことか、みたときに、そういやなぁ...と思った。
Private _srcParameter As New List(Of String)
Private _dstParameter As New List(Of String)
Sub Main()
Dim targetParameter As New List(Of String)
targetParameter.Add("朝日のあたる家")
targetParameter.Add("グインサーガ")
targetParameter.Add("伊集院大介の冒険")
_srcParameter = targetParameter
TitlePrint(_srcParameter)
targetParameter.Clear()
targetParameter.Add("おにぎり")
targetParameter.Add("のりまき")
targetParameter.Add("こーんすたーち")
_dstParameter = targetParameter
ItemPrint(_dstParameter)
Console.WriteLine("=====================================")
For Each sItem As String In _srcParameter
Console.WriteLine("手元にある本:" & sItem)
Next
For Each sitem As String In _dstParameter
Console.WriteLine("買い物リスト:" & sitem)
Next
End Sub
Private Sub TitlePrint(ByVal sList As List(Of String))
For Each sItem As String In sList
Console.WriteLine("手元にある本:" & sItem)
Next
End Sub
Private Sub ItemPrint(ByVal sList As List(Of String))
For Each sitem As String In sList
Console.WriteLine("買い物リスト:" & sitem)
Next
End Sub
あれぇ、どうしてだろうと思った時、それが値なのか、参照なのか、を意識していない。