0

WPFウィンドウが読み込まれると、UserProfile変数を使用して現在のユーザーディレクトリをtextbox1.textに表示するテキストボックス（textbox1）があります

   Private Sub Window_Loaded(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles MyBase.Loaded
    Dim defaultpath As String = Environment.CurrentDirectory
    Environment.CurrentDirectory = Environment.GetEnvironmentVariable("UserProfile")
    TextBox1.Text = defaultpath

    End Sub

クリックすると、FolderBrowserDialog を使用してフォルダーを参照し、textbox1.text に新しいフォルダー パスを表示するボタンもあります。

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles Button1.Click
    Dim fldDialog As New FolderBrowserDialog()
    fldDialog.RootFolder = Environment.SpecialFolder.Desktop
    fldDialog.ShowDialog()
    Dim filepathstore As String = fldDialog.SelectedPath

    TextBox1.Text = filepathstore
     End Sub

値は、FolderBrowserDialog で選択されたパスを表示するようになりました。

この新しい値をどのように保存し、WPF ウィンドウを閉じたり再度開いたりすると、デフォルト値の代わりにこの新しい値が表示されます。(デフォルト値を削除せずに置き換えます)

folderpath のこの新しい値は、必要に応じて何度でも変更できます。ただし、リセット ボタンをクリックすると、WPF ウィンドウはデフォルト値に戻ります。

4

1 に答える 1

0

最も簡単なオプションは、いつでも呼び出せるように値をファイルに保存することです。以下のコードは、FormClosing イベントが呼び出されたときに保存する値が textbox1.text にあると想定し、フォームが開かれたときにそれを textbox1.text にロードし直します。

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    Dim s As String
    s = TextBox1.Text
    Dim loc As String
    loc = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "/testfile.txt"
    My.Computer.FileSystem.WriteAllText(loc, TextBox1.Text, False)
End Sub

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    Dim loc As String
    loc = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "/testfile.txt"
    Dim s As String
    s = My.Computer.FileSystem.ReadAllText(loc)
    TextBox1.Text = s
End Sub

これに問題がある場合はお知らせください:)

于 2012-11-22T05:32:46.243 に答える