diff --git a/.vs/BLV_Studio/v16/.suo b/.vs/BLV_Studio/v16/.suo index 592b4b5..00b1a87 100644 Binary files a/.vs/BLV_Studio/v16/.suo and b/.vs/BLV_Studio/v16/.suo differ diff --git a/BLV_Studio/My Project/AssemblyInfo.vb b/BLV_Studio/My Project/AssemblyInfo.vb index 6a06bc9..30927dc 100644 --- a/BLV_Studio/My Project/AssemblyInfo.vb +++ b/BLV_Studio/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices '通过使用 "*",如下所示: ' - + diff --git a/BLV_Studio/Test/GridTest/TableInteraction.vb b/BLV_Studio/Test/GridTest/TableInteraction.vb index e3812ad..c18434f 100644 --- a/BLV_Studio/Test/GridTest/TableInteraction.vb +++ b/BLV_Studio/Test/GridTest/TableInteraction.vb @@ -4303,7 +4303,7 @@ Public Class TableInteraction Dbuf = dic.Item(GetDescriptionOriginal(AddPeripherals.Temproweven.互锁)).Trim.Split("*") ncbuf.Add(GetActionData(DeviceModuleDic, Dbuf(0), "Temp", Dbuf(1), "0,1,1,1,1,1,16")) End If - If FVer =67 Then + If FVer =68 Then Dim btxtr As string Dim bctr As Integer=48 @@ -4325,7 +4325,7 @@ Public Class TableInteraction dim btxli As Byte()= GetActionData(DeviceModuleDic, DevName, "Temp", 1, btxtr) btxli(5) = bctr ncbuf.Add(btxli) - Else If FVer > 67 Then + Else If FVer > 68 Then Else If checkbuf(1).Equals("1") Then 'Dbuf = dic.Item([Enum].GetName(GetType(AddPeripherals.Temproweven), AddPeripherals.Temproweven.互锁)).Trim.Split("*") @@ -4394,7 +4394,7 @@ Public Class TableInteraction ncbuf.Add(GetActionData(DeviceModuleDic, Dbuf(0), "Temp", Dbuf(1), "0,1,1,1,1,1,16")) End If - If FVer =67 Then + If FVer =68 Then Dim btxtr As string Dim bctr As Integer=32 @@ -4418,7 +4418,7 @@ Public Class TableInteraction dim btxli As Byte()= GetActionData(DeviceModuleDic, DevName, "Temp", 1, btxtr) btxli(5) = bctr ncbuf.Add(btxli) - Else If FVer > 67 Then + Else If FVer > 68 Then Else If checkbuf(1).Equals("1") Then