关于vb中的串口属性的设置！

[zhangjie_it]

vb。net中，做串口编程，在设置属性port1.ReceivedBytesThreshold 的时候；
只要给这个属性赋值，在调试的时候，调试到这一句，就死机。
哪怕这个属性Me.SerialPort1.ReceivedBytesThreshold = 1也会死机！

请问怎么回事，谢谢！

[兔子-顾问]

先关闭串口，设置好在打开试试？

[kidnap]

Me.SerialPort1.ReceivedBytesThreshold ="1"

[kidnap]

不好意思，上一贴错了。 我是这么做的，没有出错。

With serialport1
                .PortName = comParams(cP.cPort) 'TBD reopen 异常
                .BaudRate = CInt(comParams(cP.cBaud))
                'demo working with enumerations. get enum value from string
                .Parity = DirectCast([Enum].Parse(GetType(Parity), comParams(cP.cParity)), Parity) 'get enum value from string
                .DataBits = CInt(comParams(cP.cData))
                .StopBits = DirectCast([Enum].Parse(GetType(StopBits), comParams(cP.cStop)), StopBits)
                .Handshake = Handshake.None
                .RtsEnable = False
                'set the set the number of bytes in readbuffer, when event will be fired
                .ReceivedBytesThreshold = CInt(comParams(cP.cThreshold))
                Me._threshold = .ReceivedBytesThreshold
                'i this usage 5000ms will never be reached because we read only bytes present in readbuffer
                .ReadTimeout = 5000
                'default value. make changes here
                .ReadBufferSize = 512 
                'default value
                .WriteBufferSize = 256 
                'make changes here
                '.Encoding = System.Text.Encoding.ASCII
                'delay so that event handle can fetch more bytes at once
                Me._receiveDelay = CInt(comParams(cP.cDelay))
            End With

[zhangjie_it]

引用 1 楼 wuyazhe 的回复:

先关闭串口，设置好在打开试试？

感谢，ok了！