急！请问在VB6开发中，如何在无FORM的情况下使用Winsock控件

Question

模块中
dim wsock as winsock
set wsock= new winsock

Answer 1

用控件数族试一下，把WINSOCK当前状态为0的卸载了或做为下一个连接请求的应答对象
改用VC OR CB会很好处理的

Answer 2

没有办法，他是一个控件而不是一个class

Answer 3

yi qiu dfkdjonce i let a ture love

Answer 4

WINSOCK控件一定要个容器，很难办

Answer 5

你从“reference”中引用进来试试，不从“component”中引用，然后
Dim WithEvents oWinSock As MSWinsockLib.Winsock
Private Sub Form_Load()
Set oWinSock = New MSWinsockLib.Winsock
End SubPrivate Sub oWinSock_DataArrival(ByVal bytesTotal As Long)End SubPrivate Sub oWinSock_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)End Sub
但可以会有问题

Answer 6

上面的不用放在FORM中，放在CLASS中

Answer 7

你是不是要写木马， 赫赫`~~
最好是加一个form 不显示就行拉，
否则编成难度增加也不稳定