循环通过改变checkbox的caption就可以了
定义控件数组dim a(n) as textboxa(0) = textbox1a(1) = textbox2以此类推赋值的时候,for i = 0 to na(i).text = "....."next就可以了