private bolBoxAClickedFirst as boolean
private sub boxA_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) handles boxA.Click
messagebox.show("I was clicked first (I being BoxA)")
bolboxaClickedfirst = true
end sub
private sub boxB_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) handles boxB.Click
messagebox.show("Nope, I was clicked first (I being BoxB)")
bolboxBClickedfirst = false
end sub
private sub someothersub()
if bolboxAclickedfirst then
messagebox.show("You clicked BoxA first")
else
messagebox.show("Nope, you clickes BoxB first, don't ask me why, I told you not to.")
endif
end sub