vb.net 怎么增加数组的长度，求救

已知一个数组Dim a() As Integer ={10,25,5,7,30}
我想把这个数组加一位数，现在这个数组长度是5，我想变成6怎么弄

Dim b() As Integer = { 0 }
a = a.Concat(b).ToArray()