Sorry if I'm not explain better my thought.... I've modified my SUB as below.... and in every timer before to Call the Sub, I close the Istance:
Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
IDEA.Close()
Call PLC()
..........
Public Sub PLC()
'attivo il timer
Timer3.Enabled = True
Timer1.Enabled = True
Try
IDEA = New TcpClient("192.168.1.101", 502)
Catch Errore As Exception
Timer1.Enabled = False
'
Timer3.Enabled = False
Timer4.Enabled = False
Timer5.Enabled = False
Timer6.Enabled = False
Timer7.Enabled = False
Timer8.Enabled = False
Timer9.Enabled = False
Timer10.Enabled = False
Timer11.Enabled = False
Timer12.Enabled = False
MsgBox("Can't connect PLC Socket")
Sleep(10000)
IDEA.Close()
Call PLC()
End Try
Premium = Modbus.Device.ModbusIpMaster.CreateIp(IDEA)
End Sub
Hope to be more clear now...
Thanks