vb2010的断点调试有关问题
vb2010的断点调试问题
Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
Dim Rbyt(0) As Byte
If SerialPort1.BytesToRead <> 0 Then
Rtxt = SerialPort1.Read(Rbyt, 0, 1)
Dim Nthread As New Threading.Thread(AddressOf ShowTextInvoke)
Nthread.Start()
Nthread.Abort()
End If
End Sub
Public Sub ShowTextInvoke() '这下面两个过程设置断点,全速的时候却跳不到这两个过程里面来,但是最终显示
Me.Invoke(New VoidDelegate(AddressOf ShowText))'的结果好像是正确的,我就搞不懂了,关于委托他的执行
End Sub '流程是怎么样子的,为什么从断点调试里面看不出来呢,这个程序只是截取了部分
Public Sub ShowText()
Me.Rtext.Text = Rtxt
End Sub
------解决方案--------------------
楼主可以试试 按F10 加 F11 单步调试 去观察程式码的执行状态
Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
Dim Rbyt(0) As Byte
If SerialPort1.BytesToRead <> 0 Then
Rtxt = SerialPort1.Read(Rbyt, 0, 1)
Dim Nthread As New Threading.Thread(AddressOf ShowTextInvoke)
Nthread.Start()
Nthread.Abort()
End If
End Sub
Public Sub ShowTextInvoke() '这下面两个过程设置断点,全速的时候却跳不到这两个过程里面来,但是最终显示
Me.Invoke(New VoidDelegate(AddressOf ShowText))'的结果好像是正确的,我就搞不懂了,关于委托他的执行
End Sub '流程是怎么样子的,为什么从断点调试里面看不出来呢,这个程序只是截取了部分
Public Sub ShowText()
Me.Rtext.Text = Rtxt
End Sub
------解决方案--------------------
楼主可以试试 按F10 加 F11 单步调试 去观察程式码的执行状态