در vb.net چه طوري يه منوي with event تعريف كنم؟