Public Class TxtEventArgs
    Inherits EventArgs
    Public TxtLog As String
End Class

Public Class ByteEventArgs
    Inherits EventArgs
    Public Data As Byte
End Class

Public Class TCPDataReceivedEventArgs
    Inherits EventArgs
    Public Data() As Byte
    Public Lenght As Integer
End Class

Public Delegate Sub TxtEventHandler(ByVal sender As Object, ByVal e As TxtEventArgs)
Public Delegate Sub ByteEventHandler(ByVal sender As Object, ByVal e As ByteEventArgs)
Public Delegate Sub TCPDataReceivedEventHandler(ByVal sender As Object, ByVal e As TCPDataReceivedEventArgs)