Chat Program

I am trying to write a Chat Program that will work across my school's LAN, It is for my final Project, I need to know how to get to the network with Visual Basic. Any help would be amazing.


  • This is an example

    [code]Imports System.Net.Sockets
    Imports System.Net
    Imports System.Threading
    Imports System.Text

    Public Class Tester

    Public Shared Sub Main
    Dim myTcpClient As New TcpClient()
    Dim myNetworkStream As NetworkStream

    myTcpClient.Connect("", 12345)
    myNetworkStream = myTcpClient.GetStream()
    Catch ex As ArgumentOutOfRangeException
    Catch ex As SocketException
    End Try

    Dim myBytes() As Byte = Encoding.ASCII.GetBytes("asdf")

    myNetworkStream = myTcpClient.GetStream()
    myNetworkStream.Write(myBytes, 0, myBytes.Length)

    Dim bufferSize As Integer = myTcpClient.ReceiveBufferSize
    Dim myBufferBytes(bufferSize) As Byte

    myNetworkStream.Read(myBufferBytes, 0, bufferSize)
    Console.WriteLine(Encoding.ASCII.GetString(myBufferBytes, 0, bufferSize))
    End Sub
    End Class[/code]

    Details also at:

  • This post has been deleted.
  • This post has been deleted.
  • This post has been deleted.
  • This post has been deleted.
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!


In this Discussion