1，修复节点重试次数累加问题（临时措施）

2，在调试和测试页面，增加测试中结果实时刷新功能

UTS_Core/UTSModule/Station/FrmStationPlan.vb

@@ -394,6 +394,29 @@ Namespace UTSModule.Station
             _planGrid.TestNodeChanged(e.Node)
         End Sub
 
+
+        Private Sub TestNodeResultChanged(sender As Object, e As TestNodeResultChangedEventArgs) Implements IUtsTest.TestNodeResultChanged
+            If _tester.DebugMode = False Then Return
+            If GrdStationPlan.InvokeRequired Then '判断是否需要开委托
+                GrdStationPlan.Invoke(New Action(Of Object, TestNodeResultChangedEventArgs)(AddressOf TestNodeResultChanged), New Object() {sender, e})
+                Return
+            End If
+
+            Dim cor As Color
+            If e.TestReturn.ExecuteResult Then
+                cor = Color.Green
+            Else
+                cor = Color.Red
+            End If
+            'Dim txt As String = $"Result:{e.TestReturn.ExecuteResult};Retrun:{e.TestReturn.RecordValue};Lower:{e.TestReturn.LowerLimit};Upper:{e.TestReturn.UpperLimit};Tip:{e.TestReturn.ExecuteResultTipString}{vbCrLf}"
+            'Momo 2023-12-15 提示信息增加两个标准显示
+            Dim txt As String = $"Result:{e.TestReturn.ExecuteResult}; Retrun:{e.TestReturn.RecordValue}; Lower_1:{e.TestReturn.LowerLimit};Upper_1:{e.TestReturn.UpperLimit}; Lower_2:{e.TestReturn.LowerLimit_2};Upper_2:{e.TestReturn.UpperLimit_2}; Tip:{e.TestReturn.ExecuteResultTipString}{vbCrLf}"
+
+            AppendText(cor, txt)
+
+            _planGrid.NodeCompleted(e.Node, e.TestReturn)
+        End Sub
+
         Private Sub TestNodeCompleted(sender As Object, e As TestNodeCompletedEventArgs) Implements IUtsTest.TestNodeCompleted
             If _tester.DebugMode = False Then Return
             If GrdStationPlan.InvokeRequired Then '判断是否需要开委托
@@ -494,6 +517,7 @@ Namespace UTSModule.Station
 
             AddHandler _tester.TestNodeChanged, AddressOf TestNodeChanged
             AddHandler _tester.TestNodeCompleted, AddressOf TestNodeCompleted
+            AddHandler _tester.TestNodeResultChanged, AddressOf TestNodeResultChanged
 
             AddHandler _tester.TestProgressChanged, AddressOf TestProgressChanged
             AddHandler _tester.RetryProgressChanged, AddressOf RetryProgressChanged