C#/VB ダイアログボックスで名前をつけて保存する方法 | SaveFileDialogの使い方

using System.Windows.Forms;
using System.IO;

Imports System.Windows.Forms
Imports System.IO

SaveFileDialog saveFileDialog1 = new SaveFileDialog();
saveFileDialog1.Title = "名前をつけて保存";
saveFileDialog1.Filter = "テキストファイル|*.txt|すべてのファイル|*.*";

Dim saveFileDialog1 As New SaveFileDialog()
saveFileDialog1.Title = "名前をつけて保存"
saveFileDialog1.Filter = "テキストファイル|*.txt|すべてのファイル|*.*"

if (saveFileDialog1.ShowDialog() == DialogResult.OK)
{
    // ファイルが選択された場合の処理
    string filename = saveFileDialog1.FileName;
    // ファイルに書き込む処理などを実装する
}

If saveFileDialog1.ShowDialog() = DialogResult.OK Then
    ' ファイルが選択された場合の処理
    Dim filename As String = saveFileDialog1.FileName
    ' ファイルに書き込む処理などを実装する
End If

// SaveFileDialogコンポーネントを作成します
SaveFileDialog saveFileDialog1 = new SaveFileDialog();
// ファイルの種類を制限します
saveFileDialog1.Filter = "Text files (.txt)|.txt|All files (.)|.";
// ファイルの種類を初期表示するインデックスを設定します
saveFileDialog1.FilterIndex = 1;
// ダイアログボックスを閉じた後に、前回のディレクトリを復元するかどうかを指定します
saveFileDialog1.RestoreDirectory = true;
//ダイアログボックスを表示します
if (saveFileDialog1.ShowDialog() == DialogResult.OK)
{
    //ファイルに合った保存する処理を記述
    //ここではファイル名を出力する
    Debug.WriteLine(saveFileDialog1.FileName);

}

' SaveFileDialogコンポーネントを作成します
Dim saveFileDialog1 As New SaveFileDialog()

' ファイルの種類を制限します
saveFileDialog1.Filter = "Text files (.txt)|.txt|All files (.)|."

' ファイルの種類を初期表示するインデックスを設定します
saveFileDialog1.FilterIndex = 1

' ダイアログボックスを閉じた後に、前回のディレクトリを復元するかどうかを指定します
saveFileDialog1.RestoreDirectory = True

' ダイアログボックスを表示します
If saveFileDialog1.ShowDialog() = DialogResult.OK Then
    ' ファイルに合った保存する処理を記述
    ' ここでは、ファイル名を出力します
    Debug.WriteLine(saveFileDialog1.FileName)
End If