VB中winsock控件怎么使用？？？ - .NET技术 / VB.NET

VB中winsock控件怎么使用？？？

---

Socket客户端使用例代码：
功能：先创建socket,再连接，最后发送数据。

  dim sc as socket = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp); 'TCP
  sc.Connect(new IPEndPoint(IPAddress.Parse("192.168.0.23"), 5000)); '地址 端口
  if (sc.Connected) then
  '发送数据
  dim b(4) as byte
  b(0)=asc('h')
  b(1)=asc('e')
  b(2)=asc('l')
  b(3)=asc('l')
  b(4)=asc('o')
  sc.Send(b)
  end if

{{