优化回路上传页面、节能属性上传页面、限制内部预留服务

BLV_Studio/Test/GridTest/ServiceAttribute.vb

@@ -46,8 +46,13 @@ Public Class ServiceAttribute
         Dic_3 = New List(Of String)
         '单位
         Dic_4 = New List(Of String)
-
+        Dim fustr As String = "服务-"
         For Each node In G_hostNode.Nodes
+            fustr = "服务-" & node.LoopAddr
+            '2025 12 29 CZH 增加 判断服务是否是 是在25 到48 且名称符合 "服务-服务号"的格式 符合则不 添加
+            If node.LoopAddr >= 25 AndAlso node.LoopAddr <= 48 AndAlso fustr.Equals(node.Name) Then ' 
+                Continue For
+            End If
             Dic_1.Add($"{node.LoopAddr}:{node.Name }")
         Next