Private Sub TestToolStripMenuItem1_Click(ByVal sender As System.Object, _
      ByVal e As System.EventArgs) Handles TestToolStripMenuItem1.Click
        Dim str As String = "newMenuItem_click"
        mnuMenu.Items.Add(str,)
    End Sub