[vb.net/mobile/移动编程]选中动态生成的菜单

大佬教程收集整理的这篇文章主要介绍了[vb.net/mobile/移动编程]选中动态生成的菜单，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

在程序运行时可动态生成菜单，如导入某个文件夹下的数据库名称，用户可点击任一子菜单，进入该数据库下编辑浏览。但是如何在子菜单前面加“√”，即仅仅使该子菜单的checked = True，而其他子菜单没有这个“√”，方法如下。

在生成动态菜单的自定义事件下加入下列代码：

其中MenuItem1指动态生成子菜单的母级菜单。

Dim itemClicked As New MenuItem '获得当前选中的菜单项 itemClicked = CType(sender,MenuItem) '获得当前选中的菜单项 Dim itm As New MenuItem '获得MenuItem1下所有的子菜单 Dim j As <a href="http://code.js-code.com/tag/Intege/" target="_blank" class="keywords">Intege</a>r For j = 0 To MenuItem1.MenuItem<a href="http://code.js-code.com/tag/s/" target="_blank" class="keywords">s.</a>Count - 1 itm = CType(MenuItem1.MenuItems(j),MenuItem) it<a href="http://code.js-code.com/tag/m/" target="_blank" class="keywords">m.</a><a href="http://code.js-code.com/tag/chec/" target="_blank" class="keywords">chec</a>ked = <a href="http://code.js-code.com/tag/fal/" target="_blank" class="keywords">fal</a>se '所有的子菜单不选中 Next itemClicked.<a href="http://code.js-code.com/tag/chec/" target="_blank" class="keywords">chec</a>ked = True '当前选中的菜单选中

大佬总结

以上是大佬教程为你收集整理的[vb.net/mobile/移动编程]选中动态生成的菜单全部内容，希望文章能够帮你解决[vb.net/mobile/移动编程]选中动态生成的菜单所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。