VB.NET, C#, PowerShell Tipsサイト

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    'メニュー項目の作成
    Dim menuFile As New ToolStripMenuItem
    menuFile.Text = "ファイル(&F)"

    Dim menuFileNew As New ToolStripMenuItem
    menuFileNew.Text = "新規作成(&N)"
    '「新規作成」を「ファイル」へ追加
    menuFile.DropDownItems.Add(menuFileNew)

    Dim menuFileSave As New ToolStripMenuItem
    menuFileSave.Text = "上書き保存(&S)"
    '「上書き保存」を「ファイル」へ追加
    menuFile.DropDownItems.Add(menuFileSave)

    Dim menuFileSaveAs As New ToolStripMenuItem
    menuFileSaveAs.Text = "名前を付けて保存(&A)"
    '「名前を付けて保存」を「ファイル」へ追加
    menuFile.DropDownItems.Add(menuFileSaveAs)

    'メニュー項目の追加
    MenuStrip1.Items.Add(menuFile)


    'メニュー項目の作成
    Dim item2 As New ToolStripMenuItem
    item2.Text = "編集(&E)"
    'メニュー項目の追加
    MenuStrip1.Items.Add(item2)
End Sub