C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

イベントハンドラ　実行順について

分類:[VB.NET]　

分類:[VB.NET]　

はじめまして、イベントハンドラについての質問です。
Button1、Button2が画面上にあり、
例えば、次のようにそれぞれのボタンで実行したい処理と
２つのボタンで同じ処理をしたい場合があります。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MessageBox.Show("ボタン１が押されました")
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
MessageBox.Show("ボタン２が押されました")
End Sub

Private Sub Button_both(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click
MessageBox.Show("ボタン１、２が押されました")
End Sub

この場合、２つのボタンで同じ処理をするプログラムを先に実行させてから
それぞれのボタンで実行したい処理をしたいときに
どうすれば実行順を決められるのか教えてください。

プログラムの順番を変えても処理順は変わらず、
また、イベントハンドラ名(button_bothなど)を変えてみたら
順番が変わりましたが、
たまたまなのか、どのような規則で変わっているのかが分かりません。
初心者ですが、ご回答よろしくお願いします。

分類:[VB.NET]　

■No5118に返信(あんずさんの記事)
> はじめまして、イベントハンドラについての質問です。
> Button1、Button2が画面上にあり、
> 例えば、次のようにそれぞれのボタンで実行したい処理と
> ２つのボタンで同じ処理をしたい場合があります。
>
> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
> MessageBox.Show("ボタン１が押されました")
> End Sub
>
> Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
> MessageBox.Show("ボタン２が押されました")
> End Sub
>
> Private Sub Button_both(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click
> MessageBox.Show("ボタン１、２が押されました")
> End Sub
>
> この場合、２つのボタンで同じ処理をするプログラムを先に実行させてから
> それぞれのボタンで実行したい処理をしたいときに
> どうすれば実行順を決められるのか教えてください。
>
> プログラムの順番を変えても処理順は変わらず、
> また、イベントハンドラ名(button_bothなど)を変えてみたら
> 順番が変わりましたが、
> たまたまなのか、どのような規則で変わっているのかが分かりません。
> 初心者ですが、ご回答よろしくお願いします。

何でイベントなんかで統合しようとするのかがわからん。自分から難しくしてるだけ。
メソッドを書いてそのメソッドを２つのイベントハンドラで呼び出せばいいじゃん。

分類:[VB.NET]　

■No5118に返信(あんずさんの記事)
初めましてKEIです。

Private Sub Button_Click(ByVal sender As System.Object, ByVal e As
　　　　　　　　　　　System.EventArgs) Handles Button1.Click, Button2.Click

Dim btn As Button = DirectCast(sender, Button)
'全てのボタンで行いたい処理
MessageBox.Show(btn.Name.ToString, "ボタン押下", _
　　　　　　　　 MessageBoxButtons.OK, MessageBoxIcon.Information)

'各ボタンで行いたい処理
Select Case btn.Name
> Case btn.Name = "Button1"
> MessageBox.Show(btn.Name.ToString & vbCrLf & "が押されました", "ボタン押下", _
MessageBoxButtons.OK, MessageBoxIcon.None)
> Case btn.Name = "Button2"
> MessageBox.Show(btn.Name.ToString & vbCrLf & "が押されました", "ボタン押下", _
MessageBoxButtons.OK, MessageBoxIcon.None)
End Select
End Sub

分類:[VB.NET]　

■No5124に返信(KEIさんの記事)
> ■No5118に返信(あんずさんの記事)
間違って編集途中で送信しちゃいました…orz
たぶん上の内容があんずさんが実現したい事なのかな？と思うんですが…(^^;)
>名無しぃシャープさん
が、おっしゃってるように
各オブジェクトごとのイベントにちゃんと分けて書いた方が良いと思います。
Button1を押したのにButton2のイベントも実行するような形になるので…。
個々の繋がりは出来るだけなくす方がバグがでにくいし修正も容易に出来るはずです。

分類:[VB.NET]　

名無しぃシャープさん、KEIさん

ご返答ありがとうございました。
やり方がわからなくて、この方法がよい方法だと思っていました。
２人のやり方があることが分かったので、行ってみますね。

分類:[VB.NET]　

実際に試してみてできました。
ありがとうございました！

分類:[VB.NET]　

ちなみにイベントの実行順ですが、イベントの追加順に行われます。
VBの場合あえて自分でイベントを追加しない(Handlesを使う)ので不定としかいえないです。

分類:[VB.NET]　

中博俊さん

では、イベントハンドラ名を変えたときに
順番が変わったのはやはり、たまたまだったのですね。
ご回答ありがとうございます。

C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

イベントハンドラ 実行順について

過去ログには書き込み不可

イベントハンドラ　実行順について