关于winsock控件编写程序控制仪器，请大侠们帮个忙啊！！

我现在有一个仪器是通过网口读取仪器上的数据的，我用VB里的Winsock控件来编写读取数据的程序，如果把两个Winsock控件放到一个程序里，就只能读一次，不能实现反复读，如反复读提示Winsock控件加载错误。我现在就想在一个程序里用Winsock控件实现对这个仪器控制，而且能重复读数据。不知道哪位大侠有做过这方面的经验，请指点一下，不胜感激！ 以下代码是我在两个程序里实现的发送和读数据程序 
'''发送命令代码 
Private Sub Form_Load() Winsock1.RemoteHost = "192.168.0.193"   '表示服务器主机名 
Winsock1.RemotePort = 51344     '表示服务器端口名 
Winsock1.Connect 
End Sub Private Sub Sendcommand_Click() Winsock1.SendData ("D" & EOS)    '读数据命令 End Sub ''''读数据代码 Private Sub Form_Load() 
SockC.RemoteHost = "192.168.0.193" '仪器的IP 
SockC.RemotePort = 51344 '表示仪器的端口 
SockC.Connect End Sub Private Sub SockC_DataArrival(ByVal bytesTotal As Long) 
        Dim S As String 
        SockC.GetData S 
        Text1.Text = S 
End Sub