添加么???
如果有一个index为0 的winsock,用load。
load winsock1(1)
winsock1(1).visible=true直接添加用control.add
Dim Sk As WinsockSet Sk = Controls.Add("VB.CommandButton", "cc", Form1)

解决方案 »

  1.   

    通常都是像 coolsky(天心) 那么用的啊?可以用 CreateObject
      

  2.   

    如果是在设计时要用控件数组,只要将他们的名字改为一样就可以了。
    也就是将winsock1,winsock2,winsock3。。全改为winsock,就可以了。当然直接copy也是一样可以的。
      

  3.   

    Dim Sk As WinsockSet Sk = Controls.Add("VB.CommandButton", "cc", Form1)回出错啊,是不是VB要引用什么啊?load可以用的