VB中双机通讯winsock 空间运行不起来

Question

VB6.0进行双机通讯的时候，connect程序如下：

Public Sub connectsub()
   If flagcom = 1 Then
      wskClient.RemoteHost = IPstr
      wskClient.RemotePort = Text4.Text
      wskClient.Connect
   Else
      wskClient.Close
在运行过程中，直接卡在第一句，不管remotehost在第一句还是remoteport在第一句都直接卡在第一句，显示当前操作无效
实在不知道怎么办了，求大佬解答

Answer 1

防火墙关闭了没有，以及winsock.ocx控件正确安装注册了没有