请问VB中如何把一个数组直接赋给另一个数组？

比如  dim A() as integer, B() as integer
当A有了值后，怎么才能把A直接赋给B呢  ，我不想一个一个的循环赋值 当A有了值