-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 に答える