イベント分岐につきまして
投稿者 魔界の仮面弁士 (社会人)
投稿日時
2020/4/3 11:48:57
状況が良く分からないのですが、これでは駄目でしょうか。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
SampleProcedure1() 'SampleProcedure1 を呼ぶのは、Button1 が押された時だけ
SampleProcedure2(sender) 'SampleProcedure2 は、Button1 / Button2 の両方で呼ぶ
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'' SampleProcedure1() 'Button2 の時は SampleProcedure1 を呼ばない
SampleProcedure2(sender) 'Button1 / Button2 どちらでも SampleProcedure2 を呼ぶ
End Sub
Private Sub SampleProcedure1()
MsgBox("Proc1")
End Sub
Private Sub SampleProcedure2(btn As Object)
If btn Is Button2 Then
'引数を使って、処理を行うかどうかを判断する
MsgBox("Button2 から呼ばれた Proc2")
End If
End Sub
以下のような動作を行いたいのですが、どうすればいいかわからず質問させていただきます。
・あるプロシージャを起こしたときに、もしもButton1を押したら発生させる。
もしもButton2を押したら発生させない。というような記述を施したいです。
ものすごくフワッとした説明で申し訳ありません。