请教关于用WINSOCK监听的时候为什么需要判断INDEXPrivate intMax As LongPrivate Sub Form_Load()intMax
请教关于用WINSOCK监听的时候为什么需要判断INDEX Private intMax As Long
Private Sub Form_Load() intMax = 0 sckServer(0).LocalPort = 1001 sckServer(0).Listen End Sub
Private Sub sckServer_ConnectionRequest _ (Index As Integer, ByVal requestID As Long) If Index = 0 Then intMax = intMax + 1 Load sckServer(intMax) sckServer(intMax).LocalPort = 0 sckServer(intMax).Accept requestID Load txtData(intMax) End If End Sub