添加么???
如果有一个index为0 的winsock,用load。
load winsock1(1)
winsock1(1).visible=true直接添加用control.add
Dim Sk As WinsockSet Sk = Controls.Add("VB.CommandButton", "cc", Form1)
如果有一个index为0 的winsock,用load。
load winsock1(1)
winsock1(1).visible=true直接添加用control.add
Dim Sk As WinsockSet Sk = Controls.Add("VB.CommandButton", "cc", Form1)
也就是将winsock1,winsock2,winsock3。。全改为winsock,就可以了。当然直接copy也是一样可以的。