vb.net的socket编程

最新推荐文章于 2019-08-31 23:36:49 发布

風雲工作室

最新推荐文章于 2019-08-31 23:36:49 发布

阅读量1.1w

点赞数 2

分类专栏： vb.net 文章标签： socket vb.net string button textbox byte

本文链接：https://blog.youkuaiyun.com/angxiao/article/details/6969301

版权

本文介绍了如何使用VB.NET进行Socket编程，包括客户端和服务器端的实现。客户端通过按钮触发发送事件，将TextBox中的文本编码后发送给指定IP和端口的服务器。服务器端则创建Socket监听，接收客户端数据并显示在TextBox中。此外，还提到了UDP广播的发送和接收方法。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

（1）客户端：

‘发送

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim bytes(1024) As Byte '声明字节数组
        Dim sender1 As New System.Net.Sockets.Socket(Net.Sockets.AddressFamily.InterNetwork, Net.Sockets.SocketType.Stream, Net.Sockets.ProtocolType.Tcp)
        '初始化socket
        Dim msg As Byte() = System.Text.Encoding.Unicode.GetBytes(TextBox1.Text)
        '对发送的数据进行编码
        '***************************
        '指定ip和端口
        Dim ipHostInfo As System.Net.IPHostEntry = System.Net.Dns.GetHostEntry("192.168.22.131")
        Dim ipAddress As System.Net.IPAddress = ipHostInfo.AddressList(0)
        Dim ipe As New System.Net.IPEndPoint(ipAddress, 11000)
        '**********************
        sender1.Connect(ipe) '建立连接
        Dim bytesSent As Integer = sender1.Send(msg) '发送数据
        '关闭socket
        sender1.Shutdown(Net.Sockets.SocketShutdown.Both)
        sender1.Close()
    End Sub