doevents.zipdoevents.zip

利用winsock编程，telnet到交换机，开启关闭端口，达到 开通关闭网络的需求 Private Sub Command19_Click() setStat "22", " no shutdown" End Sub Private Sub Command2_Click() setStat "7", "shutdown" End Sub Private Sub Command21_Click() m = Text1 mOpen_Click End Sub Private Sub Comman