Public Class Form1
Dim count1 As Integer = 0
Dim count2 As Integer = 0
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
count1 = count1 + 1
MsgBox("You clicked Button1 " & count1 & " times")
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
count2 = count2 + 1
MsgBox("You clicked Button2 " & count2 & " times")
End Sub
Private Sub btnTotal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTotal.Click
MsgBox("You clicked on Button1 " & count1 & " times." & vbCrLf & _
"You clicked on Button2 " & count2 & " times." & vbCrLf & vbCrLf & _
"For a total of " & (count1 + count2) & " times.")
End Sub
Private Sub btnReset_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReset.Click
count1 = 0
count2 = 0
End Sub
End Class