-1

我想将设置保存在我的程序中,如下所示。我有一个导入按钮来打开文件。我怎样才能做到这一点,当我下次启动我的程序时,它们已经被“导入”为设置或其他东西?*注意 - 我没有尝试过任何东西,因为我不知道如何做。

4

1 回答 1

0

当您进行导入时,代码将执行类似将所有文件名写入文本文件的操作。然后每次执行程序时读取文本文件并检查任何内容。您可能需要修改代码以适合您的程序

Private Const MySetting As String = "MySetting.txt"
Private Sub Log_into_File(ByVal Filenames() As String)

    Dim oFile As System.IO.File
    Dim oWrite As System.IO.StreamWriter
    oWriter = oFile.OpenText(MySetting)


    For Each FName As String IN Filenames
        oWrite.WriteLine(FName & VbCrLF)
    Next    

    oWriter.Close() 

End Sub

Private Function Is_Imported() As Boolean

    Dim EntireFile As String
    Dim oFile As System.IO.File
    Dim oReader As System.IO.StreamReader
    oReader = oFile.OpenText(MySetting)

    EntireFile = oRead.ReadToEnd()

    oRead.Close()

    Return Trim(Replace(EntireFile, VbCrLF, "")).Equals(String.Empty)

End Function
于 2012-04-27T01:18:45.867 回答