控件数组问题（立等给分）

我想定义一个动态的控件数组应该怎么做啊，我做了一点但老是提示出错啊，高手指点一下啊  
   
  static   i   as   integer  
   
  dim   cmd1()   as   commandbotton  
   
  Private   Sub   Form_Click()  
   
  redim   preserve   cmd1(i)   as   commandbotton  
   
  cmd1(i).top=cmd1(i-1).top+200  
   
  i=i+1  
   
  End   Sub  
   
  各位高手指教一下了~~~~  
  问题点数：20、回复次数：2Top

1 楼victorycyz（--）回复于 2003-08-02 09:55:31 得分 18

private   sub   cmdAdd_click()  
      for   i=1   to   n  
            load   cmd1(i)  
            cmd1(i).top=cmd1(i-1)+i*400  
            cmd1(i).visible=true  
      next   i  
  end   subTop

2 楼mark3798（.net菜鸟）回复于 2003-08-02 09:59:07 得分 2

帮你UP一下！Top

相关问题

• 控件
• top
• 控件数组
• cmd1
• 高手
• sub
• click

• 帖主：mazha250
• victorycyz
• mark3798

• Visual Basic类图书
• Visual Basic类源码下载