メニューバーにメニューを表示する 【注意書き】●VB.NET を使っているものとします。●動作環境は、Windows XX を使用しているとします。.NET でも、メニューバーにメニューを表示することが可能です。この機能を使えば、簡単に、メニューバーを用いたアプリケーションを作成したい場合などに活用できます。フォームに次の様なコードを記述します-----------VB.NETコーディングここから-------------------１．フォームに、メニューコントロール(MainMenu)を配置します [ここへ入力] -------------------------------------------- （フォーム外） ┏━━━━━━━━┓ ┃MainMenu1 ┃ ┗━━━━━━━━┛２．貼り付けたメニューコントロールをクリックして、 フォーム上の[ここへ入力]の文字をマウスでクリックして、 [ここへ入力]に「ファイル」と記述します。 すると、”ファイル”の文字が現れ、 [ここへ入力]が右側にずれて表示される 事を確認できます。 ※説明用のためです。必須ではありません。 ファイル [ここへ入力] -------------------------------------------- （フォーム外） ┏━━━━━━━━┓ ┃MainMenu1 ┃ ┗━━━━━━━━┛３．さらに、続けてフォーム上の”ファイル”の 文字をマウスクリックします。 その後、 フォーム上の”ファイル”下の [ここへ入力]をマウスでクリックして、 [ここへ入力]に「終了」と記述します。 ”ファイル”の下に”終了”の文字が現れる 事を確認できます。 ※説明用のためです。必須ではありません。 ファイル [ここへ入力] 終了 -------------------------------------------- （フォーム外） ┏━━━━━━━━┓ ┃MainMenu1 ┃ ┗━━━━━━━━┛４．さらに、続けてフォーム上の”ファイル”下の ”終了”をマウスでダブルクリックして、 イベントのコード編集を開始して、 次のコードを記述します。 Private Sub MenuItem2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MenuItem2.Click If MsgBoxResult.Yes = _ MsgBox("終了しますか？", MsgBoxStyle.YesNo) Then Me.Close() Else End If End Sub５．ビルドして実行します。６．フォームに表示されたメニュー”ファイル”を マウスでクリックします。７．その後、フォームに表示されたメニュー”終了”を マウスでクリックします。８．”終了しますか？”のメッセージボックスが 表示されます。９．”はい”をマウスクリックすると、 終了する事を確認できます。-----------VB.NETコーディングここまで-------------------本サンプルでは、MainMenuコンポーネントを使って、メニュー表示をしています。コードではなく、GUIによって、メニュー項目の設定を行っていきます。設定されたメニュー項目に対して、ダブルクリック等でコード編集画面にすることで、選択時のイベント処理を記述する要領となっております。
Copyright(c)2001-2004 Ai Net Makoto 記事・情報の無断転載を禁止します。
