Question

所以我试图在我的程序中使用zip文件，但是我甚至无法从io.compression中获得基本功能，即打开读取：

Imports System.IO
Imports System.IO.Compression

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim zipPath As String = "d:\test\testzip.zip"

        Using archive As ZipArchive = ZipFile.OpenRead(zipPath)
            For Each entry As ZipArchiveEntry In archive.Entries
                ListBox1.Items.Add(entry.FullName)
            Next
        End Using
    End Sub
End Class

我在这里尝试做的是将zip存档中包含的文件的列表文件名改为列表框。

视觉工作室只是打破了应用程序运行而没有给我任何错误。这几乎就像msdn上的例子一样。我确实添加了对system.io.compression和system.io.compression.filesystem的引用。

Answer 1

介意我建议XCeed？

示例：

Imports Xceed.Zip
Imports Xceed.FileSystem

Dim zip As New ZipArchive(New DiskFile("c:\test.zip"))
Dim f As AbstractFile

For Each f In zip.GetFiles( True )
 ListBox1.Items.Add( f.FullName )
Next

使用system.io.compression vb.net列出文件

1 个答案: