نمونه کد های کوچک و کاربردی VB.Net

[ravegoat]

کد زیر رشته ای را تحت شبکه به یک IP خاص با شماره پورت TCP مشخص ارسال می کند:

Dim clientSocket As New System.Net.Sockets.TcpClient()
clientSocket.Connect("127.0.0.1", 1001) 'IP:Port
Dim serverStream As System.Net.Sockets.NetworkStream = clientSocket.GetStream()
Dim data() As Byte = System.Text.Encoding.ASCII.GetBytes("Hello World") 'Message
serverStream.Write(data, 0, data.Length)