Is there a function in VB.NET which will concatenate two arrays?

Currently, I am using this function:

VB Code:
  1. Private Function AppendArray(ByVal BaseArray() As Byte, ByVal Buffer() As Byte) As Byte()
  2.         If IsArray(BaseArray) = False Then
  3.             ReDim BaseArray(Buffer.Length - 1)
  4.             Buffer.CopyTo(BaseArray, 0)
  5.         Else
  6.             ReDim Preserve BaseArray(BaseArray.Length + (Buffer.Length - 1))
  7.             Buffer.CopyTo(BaseArray, BaseArray.Length - Buffer.Length)
  8.         End If
  9.         Return BaseArray
  10.     End Function