Why cant I Call a sub??

[Edneeis]

You could also just add the menuitem to the handles:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, MenuItem2.Click