我有一个小程序,我想保存文件,以便我可以在以后打开它时阅读它们。 我现在如何保存文件原因我必须保存5个变量并将它们读回到工具中,如果可能的话我也想使用Word或OpenOffice中的文件。
我的变量
Title - Pieces- SinglePrice- Totalprice
请以正确的方式告诉我Point的例子。
谢谢大家!
答案 0 :(得分:1)
如果您只想将程序中的四个变量存储在一个也可以通过Word和OpenOffice读取的文件中,则可以使用文本文件轻松完成。以下代码假定Title
是字符串,Pieces
是整数,SinglePrice
和TotalPrice
是十进制。
Dim folder As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments
Dim saveFile As String = System.IO.Path.Combine(folder, "Save.txt")
Dim vars() As String = {Title, Pieces.ToString, SinglePrice.ToString, TotalPrice.ToString}
System.IO.File.WriteAllLines(saveFile, vars)
如果您需要读取文件以恢复变量的值,您可以这样做。请注意,此代码假定该文件是由第一段代码编写的,否则在使用之前需要验证文件的内容。
Dim folder As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments
Dim saveFile As String = System.IO.Path.Combine(folder, "Save.txt")
Dim vars() As String = System.IO.File.ReadAllLines(saveFile)
Title = vars(0)
Pieces = CInt(vars(1))
SinglePrice = CDec(vars(2))
TotalPrice = CDec(vars(3))