高手来帮帮我 谢谢了

Question

我想单击按钮就在窗体上加载50个按钮
但是这里不知道那里做错了。。
Dim a As Integer, b As Integer, c() As Integer, d As IntegerPrivate Sub Command2_Click()
    cmd(0).Height = 615
    cmd(0).Width = 615
    For i = 1 To 49
        Load cmd(a)
        If i Mod 10 = 0 Then
            cmd(a).Top = cmd(a - 1).Top + cmd(a - 1).Height
            cmd(a).Left = cmd(0).Left
        Else
            cmd(a).Top = cmd(a - 1).Top
            cmd(a).Left = cmd(a - 1).Left + cmd(a - 1).Width
        End If
        cmd(a).Width = cmd(0).Width
        cmd(a).Height = cmd(0).Height
    Next
    a = 0
    Do While (a < 15)
        b = Int(49 * Rnd + 1)
        c(a) = b
        a = a + 1
    Loop
End Sub

Answer 1

//For i = 1 To 49
        Load cmd(a)这里a的值始终是0，所以会产生错误

Answer 2

//For i = 1 To 49
        Load cmd(a)把 Load cmd(a) 改写 Load cmd(i)
把a 改为i

Answer 3

cmd 这里
子程序或函数未定义
：（