1. 数组 a 规模为(m+1)×n,其中 a(1) ~a(m ∗ n)元素中存储数据，数据中m×n个元素按行序排列成一个数字矩阵如图所示｡计算每列数据的和，并依次存储在m+1行对应的数组元素中｡

依据该算法思想，设计一个VB程序，实现该功能的代码如下，请回答下列问题｡

1. （1） 根据代码可知，该程序的按钮对象名是｡
3. （2） 在程序划线处填上合适代码｡

   Const m = 6

   Const n = 5

   Dim a(1 To (m + 1) ∗ n) As Integer

   Private Sub Form_Load()

   '数组初始化，生成 m×n 个两位数的随机整数并赋值给数组a

    Randomize

   For i = 1 To m ∗ n

    a(i)=    ①    

   Next i

   End Sub

   Private Sub Cod1_Click()

   Dim i As Integer, j As Integer

   For i = 1 To n

       ②    

   Next i

   '将计算后数据，按 m + 1 行，n 列输出到列表框中，代码略

   End Sub

   Function sum(y As Integer) As Integer         '函数功能是计算每列数据和

   sum = 0

   For i =     ③     

    sum = sum + a(i)

   Next i

   End Function

   ① ② ③