我如何使用GZip解壓字符串？

Question

壓縮工作得很好，還有解壓縮，但是如果應用程序在String被壓縮後直接關閉了，我該怎麼辦？我怎樣才能解壓它只有字符串？

//Compress 

Dim mem As New IO.MemoryStream 
Dim gz As New System.IO.Compression.GZipStream(mem, IO.Compression.CompressionMode.Compress) 
Dim sw As New IO.StreamWriter(gz) 
sw.WriteLine("hello compression") 
sw.Close() 

Dim compressed As String = Convert.ToBase64String(mem.ToArray()) 

//Decompress 

Dim mem2 As New IO.MemoryStream(mem.ToArray) 
gz = New System.IO.Compression.GZipStream(mem2, IO.Compression.CompressionMode.Decompress) 
Dim sr As New IO.StreamReader(gz) 
MsgBox(sr.ReadLine) 
sr.Close() 

Dim decompressed As String = sr.ReadLine() 

Answer 1

當程序關閉時，內存流中的數據會丟失並且無法恢復。您需要先將數據保存到文件中。