<StructLayout(LayoutKind.Sequential, Pack:=1)> Private Structure OVERLAPPED
        Public Internal As Int32
        Public InternalHigh As Int32
        Public Offset As Int32
        Public OffsetHigh As Int32
        Public hEvent As Int32
    End Structure

<StructLayout(LayoutKind.Sequential, Pack:=1)> Private Structure COMMTIMEOUTS
        Public ReadIntervalTimeout As Int32
        Public ReadTotalTimeoutMultiplier As Int32
        Public ReadTotalTimeoutConstant As Int32
        Public WriteTotalTimeoutMultiplier As Int32
        Public WriteTotalTimeoutConstant As Int32
    End Structure

<StructLayout(LayoutKind.Sequential, Pack:=1)> Private Structure DCB
        Private DCBlength As Int32
        Private BaudRate As Int32
        Private Bits1 As Int32
        Private wReserved As Int16
        Private XonLim As Int16
        Private XoffLim As Int16
        Private ByteSize As Byte
        Private Parity As Byte
        Private StopBits As Byte
        Private XonChar As Byte
        Private XoffChar As Byte
        Private ErrorChar As Byte
        Private EofChar As Byte
        Private EvtChar As Byte
        Private wReserved2 As Int16
    End Structure