Boonlive_RD_Web/Desktop_BLVStudio
9
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

修正比较数值

Browse Source
This commit is contained in:
chenzhihao
2026-03-10 16:51:11 +08:00
parent 3405e47d63
commit 4f6a56bf6e
2 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
BLV_Studio/FrmMain.vb
View File

@@ -5168,17 +5168,16 @@ Public Class FrmMain
If TrNode.Level > 1 Then
TrNode = TrNode.Parent
End If
Dim FirmwareVer As String = TrNode.FirstNode.NextNode.NextNode.Text ' TrNode.NextVisibleNode.NextNode.Text
Dim FirmwareVer As String = TrNode.FirstNode.Text ' TrNode.NextVisibleNode.NextNode.Text
Dim FVer As Integer = 0
If Not String.IsNullOrEmpty(FirmwareVer) Then
Dim Firbuf As String() = FirmwareVer.Split("_")
If Firbuf.Length > 3 Then
If Firbuf.Length > 1 Then
'将Firbuf(3)十六进制字符串转换为十进制
FVer = Convert.ToInt32(Firbuf(3), 16)
FVer = Convert.ToInt32(Firbuf(0))
End If
End If
UploadDeviceList(FVer)
End Sub
@@ -5282,12 +5281,13 @@ Public Class FrmMain
If TrNode.Level > 1 Then
TrNode = TrNode.Parent
End If
Dim FirmwareVer As String = TrNode.FirstNode.NextNode.NextNode.Text ' TrNode.NextVisibleNode.NextNode.Text
Dim FirmwareVer As String = TrNode.FirstNode.Text ' TrNode.NextVisibleNode.NextNode.Text
Dim FVer As Integer = 0
If Not String.IsNullOrEmpty(FirmwareVer) Then
Dim Firbuf As String() = FirmwareVer.Split("_")
If Firbuf.Length > 3 Then
FVer = Convert.ToInt32(Firbuf(3), 16)
If Firbuf.Length > 1 Then
'将Firbuf(3)十六进制字符串转换为十进制
FVer = Convert.ToInt32(Firbuf(0))
End If
End If
UploadDeviceList1(FVer)