Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load        For i As Integer = 0 To t - 1
            lb(i) = New Button
            Name = i
            With lb(i)
                .Left = x
                .Top = y + 40 * i
                .FlatStyle = FlatStyle.Flat
            End With
            form1.Controls.Add(lb(i))
        Next    End Sub
    Private Sub a2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lb(i).Click
        With a2
            If .BackColor = Color.White Then
                .BackColor = Color.DodgerBlue
            Else
                .BackColor = Color.White
            End If
        End With
    End Sub创建数组控件按钮后,要求点击创建的按钮后,按钮变色,可是Private Sub a2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lb(i).Click中下划线提示错误,怎么办?