VBでテキストエディタを作ろう(その3)

TVアニメ「ダーウィンズゲーム」本PV

アニメ『ダーウィンズゲーム』

可もなく不可もなく。主人公のカナメがなんだかぱっとしない。全然強くないし、逃げてばかり。シュカがカナメにゾッコンな理由がさっぱりわからないです。負けた理由も。Dゲームランキング1位のリューシュエランもカナメの力を認めて取り込もうとしたけれど、見ている私はまったく分からない、なんでカナメってそんなに人気なのでしょう。ただよく分からず、なんとなくながら見していました。でも最終回には夢中になっていました。
というか最終回が一番面白かった。急にカナメが強くなった感じ。あれはいい。我慢して視聴続けてよかったです。2期が待ち遠しいです。

VBでテキストエディタを作ろうの続きです。
FormにTextBoxを載せたので、次はMenuを載せてみます。
「ツールボックス」から「Menu」で検索すると、「MenuStrip」が見つかりますので、Formへドラッグします。

ドラッグした場所をみると、「ここへ入力」と表示されたコントロールが確認できると思います。

クリックして、「ファイル(&F)」と入力し、

続けて、その下の階層に「名前を付けて保存(&A)」を入力後、これをダブルクリックします。

自動でメソッドが追加されます。

ここに以下のコードを貼り付けます。(メソッドの中身を貼り付け)

Public Class Form1
    Private Sub 名前を付けて保存ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 名前を付けて保存ToolStripMenuItem.Click

        Dim d As New SaveFileDialog()
        d.InitialDirectory = "C:\Users\taku\Desktop\"
        If d.ShowDialog() = DialogResult.OK Then
        End If
    End Sub
End Class

実行すると、以下のようにメニューができていますので、「名前を付けて保存(A)」を選択してみます。

ダイアログが表示されました。