vb.net使用TCP协议穿透NAT代码