动态创建控件的问题!!!高手指教！

Question

http://www.csdn.net/Expert/forum.asp?typenum=8&searchKeys=%B6%AF%CC%AC%C9%FA%B3%C9&roomid=2&author=&tabletype=now这里有很多，你找找看

Answer 1

有一个简单的方法如下：（以创建Command1控件为例） 
 
在设计时创建Command1控件，修改index属性为0 
 
在动态的装如5个控件，如下： Dim  i  As  Long 
 
For  i  =  1  To  5 
 
        Load  Command1(i)  
        With  Command1(i)  
                .Top  =  Command1(0).Top  +  i  *  500  
                .Left  =  Command1(0).Left  
                .Caption  =  "第"  +  CStr(i)  +  "个装如的COMMAND控件" 
                .Visible  =  True  
        End  With 
Next  i 
 
双击command1(0)的控件，生成过程： 
 
Private  Sub  Command1_Click(Index  As  Integer) 
        MsgBox  "你按了第"  +  CStr(Index)  +  "个按钮！" 
End  Sub 
 
这样你装入的控件的行为都可以通过Command1的行为编程来实现

Answer 2

而且每一个按钮可以事先定义Click事件
你指的事先是指什么？指你还未加载就编写了事件？
如果是这样你在事件前加上on error resume next就行了