function - 使用函数时变量发生意外变化

Question

我写了一个简单的代码，但是当我运行代码IniPopulation时会变成Population，有什么原因会发生这种情况？？？我是初学者。

Module Module1

Function SelectParents(ByVal Population As String()) As String()
    Population(0) = "Micheal"
    Population(1) = "Moses"
    Return Population
End Function

Sub main()
    Dim IniPopulation() As String = {"Saed", "Ahmad"}
    Dim population() As String
    population = SelectParents(IniPopulation)
    population(0) = "AZIZ"
End Sub

End Module