修复无卡取电添加最后一个映射回路异常问题

BLV_Studio/My Project/AssemblyInfo.vb

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 '通过使用 "*"，如下所示:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("4.4.6.15")>
+<Assembly: AssemblyVersion("4.4.6.16")>
-<Assembly: AssemblyFileVersion("4.4.6.15")>
+<Assembly: AssemblyFileVersion("4.4.6.16")>

BLV_Studio/Test/GridTest/PowerSupply.vb

@@ -181,8 +181,10 @@ Public Class PowerSupply
                 crow = j
                 '21,1,0,1,
                 '21,2,10,2,
-                If chname.Contains("CH1") Then
+                If chname.Contains("CH10") Then
-                    Exit For
+                    addserviceData = "40,1,0,1,"
+                    addserviceData1 = "40,2,0,1,"
+
                     'addserviceData = "13,1,0,1,"
                     'addserviceData1 = "13,2,0,1,"
                 ElseIf chname.Contains("CH2") Then
@@ -209,9 +211,8 @@ Public Class PowerSupply
                 ElseIf chname.Contains("CH9") Then
                     addserviceData = "39,1,0,1,"
                     addserviceData1 = "39,2,0,1,"
-                ElseIf chname.Contains("CH10") Then
+                ElseIf chname.Contains("CH1") Then
-                    addserviceData = "40,1,0,1,"
+                    Exit For
-                    addserviceData1 = "40,2,0,1,"
                 Else
                     Exit For
                 End If