计算一个数组所有元素的和

vb怎么求一个数组里的所有元素的和？私有函数Qsum（ByRef a（）为整数）为Double Dim n为Double n=0表示i=LBound（a）到UBound...