chore: 漏了一个

2026-02-22 22:47:54 +08:00
parent 4c1578f9aa
commit dc7d6b3e91
1 changed files with 9 additions and 8 deletions
@@ -1075,15 +1075,16 @@ Public Module ModBase
 Re:
        Try
            '获取 MD5
-            Dim File As New FileStream(FilePath, FileMode.Open, FileAccess.Read, FileShare.ReadWrite)
-            Using h = MD5Cng.Create()
-                Dim Retval As Byte() = h.ComputeHash(File)
-                Dim Result As New StringBuilder(Retval.Length * 2)
-                For i = 0 To Retval.Length - 1
-                    Result.Append(Retval(i).ToString("x2"))
-                Next
+            Using File As New FileStream(FilePath, FileMode.Open, FileAccess.Read, FileShare.ReadWrite)
+                Using h = MD5Cng.Create()
+                    Dim Retval As Byte() = h.ComputeHash(File)
+                    Dim Result As New StringBuilder(Retval.Length * 2)
+                    For i = 0 To Retval.Length - 1
+                        Result.Append(Retval(i).ToString("x2"))
+                    Next

-                Return Result.ToString
+                    Return Result.ToString
+                End Using
            End Using
        Catch ex As Exception
            If Retry OrElse TypeOf ex Is FileNotFoundException Then