1，优化撤销功能，对调试结果信息不记录撤销

2，优化F10测试流程，连续调试时不清空测试记录

UTS_Core/UTSModule/Test/UtsTester.vb

@@ -546,6 +546,9 @@ Namespace UTSModule.Test
             If _exitTest Then Return GetExitTestReturn()
 
             If node.Action = False Then Return GetNotActionNodeResult()
+            If node.RowType = RowNode.RowTypeEnum.Flow Then
+                If String.IsNullOrEmpty(node.CommandType) OrElse String.IsNullOrEmpty(node.Command) Then Return GetNotActionNodeResult()
+            End If
 
             If TestStatus = TestStatusEnum.Testing Then _testNode = node
 
@@ -1025,7 +1028,7 @@ Namespace UTSModule.Test
         ''' 调试测试当前节点及其子节点
         ''' </summary>
         ''' <param name="obj">节点对象</param>
-        Public Sub TestNode(obj As Object)
+        Public Function TestNode(obj As Object) As TestCommandReturn
             Dim node As RowNode = CType(obj, RowNode)
 
             DebugMode = True
@@ -1071,8 +1074,8 @@ Namespace UTSModule.Test
 
             RaiseEvent TestEnd(Me, New TestEndEventArgs(_testResult))
 
-
-        End Sub
+            Return result
+        End Function
 
         ''' <summary>
         ''' 从当前节点调试测试,直到测试完当前顶级模块