thinkcmf调用导航及子菜单

1.调用导航及子菜单

<nav>
	<ul id="starlist">
		<php>
		   $navMenuModel = new \app\admin\model\NavMenuModel(); 
           $menus = $navMenuModel->navMenusTreeArray('1');
		</php>
		<li>
			<a href="/">网站首页</a>
		</li>
		<volist name="menus" id="vo">
			<php>
			   $submenus = $navMenuModel->subNavMenusTreeArray($vo['id']);
			</php>
			<li class="menu">
				<a href="{$vo['href']}" target="{$vo['target']}">{$vo['name']}</a>
				  <ul class="sub">
					<volist name="submenus" id="subvo">
						<li>
							<a href="{$subvo['href']}">{$subvo.name}</a>
						</li>
					</volist>
				 </ul>
                    <span>
  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
要在 Word VBA 中添加右键菜单及子菜单调用窗体,可以按照以下步骤进行操作: 1. 创建一个新的 Word 宏,在“开发工具”选项卡中选择“宏”。 2. 在“宏名”中输入一个名称,例如“AddContextMenu”,然后点击“创建”。 3. 在新的代码窗口中输入以下代码来创建右键菜单及子菜单: ``` '创建右键菜单 Sub AddContextMenu() Dim PopUpMenu As CommandBarPopup Dim PopUpSubMenu As CommandBarPopup Dim ButtonControl As CommandBarButton Dim SubButtonControl As CommandBarButton '创建右键菜单 Set PopUpMenu = Application.CommandBars("Text").Controls.Add(Type:=msoControlPopup, Temporary:=True) PopUpMenu.Caption = "右键菜单" '创建子菜单 Set PopUpSubMenu = PopUpMenu.Controls.Add(Type:=msoControlPopup) PopUpSubMenu.Caption = "子菜单" '创建按钮 Set ButtonControl = PopUpSubMenu.Controls.Add(Type:=msoControlButton) ButtonControl.Caption = "按钮1" ButtonControl.OnAction = "OpenForm1" '创建另一个按钮 Set SubButtonControl = PopUpSubMenu.Controls.Add(Type:=msoControlButton) SubButtonControl.Caption = "按钮2" SubButtonControl.OnAction = "OpenForm2" End Sub ``` 4. 创建一个名为“OpenForm1”的过程,该过程将打开一个名为“Form1”的用户窗体: ``` Sub OpenForm1() Form1.Show End Sub ``` 5. 创建另一个名为“OpenForm2”的过程,该过程将打开一个名为“Form2”的用户窗体: ``` Sub OpenForm2() Form2.Show End Sub ``` 6. 在“开发工具”选项卡中选择“设计模式”,然后在“控件”选项卡中选择“用户窗体”。 7. 在用户窗体中添加所需的控件和代码。 8. 保存并关闭用户窗体,返回代码窗口。 9. 在代码窗口中输入以下代码来显示右键菜单: ``` Private Sub Document_ContentControlOnEnter(ByVal ContentControl As ContentControl) '显示右键菜单 Call AddContextMenu End Sub ``` 现在,当用户右键单击 Word 文档中的内容控件时,将显示您创建的右键菜单及子菜单,并且单击菜单项将调用相应的窗体。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

瑆箫

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值