RS232通讯 VB.NET 语句编写
例:发送命令:focusoffset -w -w 12接收信息:wide focus offset value written in eeprom is 0x12 (18 in decimal)。。。长度不定。
代码怎么编写?
--------------------编程问答--------------------
--------------------编程问答-------------------- 代码有测试,会丢失数据,但用超级终端测试OK,参考附图。 --------------------编程问答-------------------- 顶二楼吧,那样写应该就没有什么问题了。串口相对还是好操作的 --------------------编程问答-------------------- 操作是简单,丢数据就麻烦。
Delegate Sub CallBack(ByVal data As String)
Private sp As SerialPort
Private Sub ConnPort()
sp = New SerialPort("com2", 9600)
AddHandler sp.DataReceived, AddressOf SerialPort_DataReceived
sp.DataBits = 8
sp.Parity = Parity.None
sp.StopBits = 1
sp.Open()
sp.Write("test")
End Sub
Private Sub GetData(ByVal data As String)
MessageBox.Show(data)
End Sub
Private Sub SerialPort_DataReceived(ByVal o As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs)
Dim data As String = sp.ReadExisting()
Dim cb As New CallBack(AddressOf GetData)
Invoke(cb, data)
End Sub
--------------------编程问答-------------------- 怎么让接受速度加快?貌似有些数据丢失,求解。
补充:.NET技术 , VB.NET