Crear items en menu strip dinamicamente

[Pax-Man]

Deseo crear los items de un MENUSTRIP dinamicamente...

Codigo para crear Item en MenuStrip

Código vb:

principal.MenuStrip.Items.Add("Herramientas", , InicioModal(Me, login))
 

Funcion a ejecutar

Código vb:

Public Sub InicioModal(ByVal padre As Form, ByVal hijo As Form)
        padre.Opacity = 0.75
        padre.Enabled = False
        hijo.FormBorderStyle = FormBorderStyle.FixedToolWindow
        hijo.StartPosition = FormStartPosition.CenterScreen
        hijo.Visible = True
        hijo.TopMost = True
    End Sub
 

y deberia ejecutar la funcion pero me es imposible... alguna idea?