如何在VB.NET中读取ZIP文件头部注释内容并存储到字符串变量

前置要求 #

• 适用运行时：.NET Framework 4.5+、.NET Core 1.0+、.NET 5+
• 需要添加程序集引用：System.IO.Compression.FileSystem
• 引入所需命名空间：

Imports System.IO
Imports System.IO.Compression

核心实现代码 #

''' <summary>
''' 读取ZIP文件的头部注释内容
''' </summary>
''' <param name="zipFilePath">ZIP文件的完整路径</param>
''' <returns>ZIP文件注释字符串</returns>
Public Function GetZipArchiveComment(zipFilePath As String) As String
    If Not File.Exists(zipFilePath) Then
        Return String.Empty
    End If

    Using zipArchive As ZipArchive = ZipFile.Open(zipFilePath, ZipArchiveMode.Read)
        Return zipArchive.Comment
    End Using
End Function

调用示例 #

' 替换为你实际的ZIP文件路径
Dim targetZipPath As String = "D:\your\file\path\test.zip"
Dim zipCommentResult As String = GetZipArchiveComment(targetZipPath)
' 注释内容已存储到zipCommentResult变量中

补充说明 #

• 上述实现直接调用.NET官方内置类库，无需引入第三方组件
• 如果需要兼容更低版本的.NET Framework，可手动解析ZIP文件结构：ZIP文件的注释存储在中央目录结束记录的末尾，偏移量22字节位置的2个字节代表注释长度，后续对应长度的字节就是注释内容，直接读取文件字节流即可解析。

内容的提问来源于stack exchange，提问作者Ira G