Dim oNs As NetworkStream = moTcpRxClient.GetStream
        If oNs.CanRead Then


            Dim FileInvio = New IO.FileStream("C:\File.txt", IO.FileMode.Create, IO.FileAccess.Write)

            '????????? 


        

        Else 
    msgbox ("Errore")
  End if