主题：[求助] 获得菜单名称

Dim fi As String

For Each st As WinForm.Strip In e.Form.Strips
    For Each it As WinForm.StripItem In st.Items
        If it.Name.StartsWith("项目") = False Then
           
            fi &= "|" & it.Name
        End If
    Next
Next
InputValue(fi,"","")

以上代码只能获取到一级菜单的名称，如何可以取得多级菜单。