第五回 VB講座 自作イベントとメニュー 自作イベント ボタンは押すだけじゃない! 「+」ボタンの上にマウスを置くと…… 自作イベント 何に対してのイベントを設定したいのか? 自作イベント どんなことがしたいのか? 自作イベント あとは実行したい命令を書くだけ 自作イベント 電卓に説明を付けよう Private Sub Button1_MouseHover( ~~~~~ Label2.Text = "足し算を行います" End Sub Private Sub Button1_MouseLeave( ~~~~~ Label2.Text = "" End Sub メニューの作り方 ツールボックスから「MainMenu」を選んで設置する 設定したい項目を書く メニューの作り方 基本的にはボタンと一緒 Private Sub MenuItem2_Click( ~~~~~ If MenuItem2.Checked = False Then Timer1.Enabled = True MenuItem2.Checked = True Else Timer1.Enabled = False MenuItem2.Checked = False End If End Sub メニューの作り方 終了確認 Private Sub MenuItem3_Click( ~~~~~ Dim Result As DialogResult Result = MessageBox.Show("終了してもよろしいですか?", "終了確認", MessageBoxButtons.YesNo) If Result = DialogResult.Yes Then End End If End Sub
© Copyright 2024 ExpyDoc