| フォーム上にボタンが2個(Button1、Button2)を配置して。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'やりたい処理
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'やりたい処理
End Sub
ではダメなんでしょうか? |