以下のサイトを参考にプログラムを作成しました。 ストリームを使用します。 Dim savedlg As SaveFileDialog = New SaveFileDialog() savedlg.Filter = "テキストファイル (*.txt)|*.txt" If savedlg.ShowDialog() = Windows.Forms.DialogResult.OK Then 'フ…