This is what I meant:
Dim lst As New List(Of MyStruct)
lst.Add(someNewItem)
Assuming you have declared this:
Public Structure MyStruct
Dim SomeValue As String
Dim SomeOtherValue As Double
End Structure
If you absolutely need to be working with arrays, try this:
MyArr = MyArr.Union({someNewItem}).ToArray