With ListView1
    ' Loop through name array
    For i = 0 To UBound(NameArray)
        .ListItems.Add i, ,NameArray(i)
    Next