VB,亲测可用1)AddCSocketMaster.clsandmodSocketMaster.bastoyourproject. 2)InaForm,ClassorUserControladdthislineinthedeclarationareaforeachsocketyouwanttouse: DimWithEventsNameOfSocketAsCSocketMaster where'NameOfSocket'isanynameyouwantforthesocket. 3)Finallyyou