Question

I have a large one dimensional array that is called ArrayHold which is populated at runtime. I run a loop to scan through the array to find out which elements need to be removed based on a few parameters. This all works great, now I am left with two arrays. The original one and a new one which contains the locations of the elements to be removed.

Original Array:

("A")("B")("C")("D")("E")("F")("G")("H")

Second Array with index/count of elements that needs to be removed:

("0")("3")("5")("7")

End result should be preferably not in a new array but a “ReDim” of the original array:

("B")("C")("E")("G")

What would be the simplest way to achieve this? I could run a loop to make all the elements that need to be removed "0" or ""? Would there be an easy way of resizing and array by dropping/removing all the white space or empty elements?

Thanks so much in advance.. 🙂

Answer 1

I would suggest to use LINQ for this, your code becomes more readable and maintanable then.

Since you haven’t shown how you’ve filtered the first array, i assume for the example that you want to remove all “A”,”D”,”F”,”H” (case sensitive):

Dim original = {"A", "B", "C", "D", "E", "F", "G", "H"}
    ' remove A,D,F,H
Dim result = (From str In original
              Where Not {"A", "D", "F", "H"}.Contains(str)).ToArray()

Result:

    (0) "B" String
    (1) "C" String
    (2) "E" String
    (3) "G" String

End result should be preferably not in a new array but a “ReDim” of
the original array: (“B”)(“C”)(“E”)(“G”)

Of course above creates a new array, but Redim creates also a new array.

Edit: Here’s an example which removes elements based on the index, assuming you have an int[] with all indices that you want to delete from the first array:

Dim deleteIndices = {0, 3, 5, 7}
' remove elements with index 0,3,5,7
Dim result = original.
          Where(Function(str, index) Not deleteIndices.Contains(index)).
          ToArray()