Office中国论坛/Access中国论坛

标题: 【新手进阶】之十三:Outlook风格导航界面 [打印本页]

作者: roych    时间: 2014-11-13 11:35
标题: 【新手进阶】之十三:Outlook风格导航界面
其实,早在两个月之前已经发过一个了。后来有版友私信给我说出错,再后面调试时发现SP5的ImageList、ListView等控件不太兼容,于是重新改为SP6版本,重新上传。[attach]55010[/attach]
至于实现思路,请参考前面的帖子
http://www.office-cn.net/thread-118864-1-1.html
当然,用ctExploer控件会更好些。正如王站提到的问题。当出现三级菜单时,则需要在右侧再加一个ListView。下次有时间再测试~~

自我鼓励下哈^_^
**********************************************************************************************************************
2014-12-16更新:

针对大家提到的问题,发布Access2010版和对应的ADE文档。由于Imagelist在64位的Office 2010版本上不太兼容(目前我是装了2010版本+2003)效果图见ACCDE文档。如果仍有“没有任何控件”的错误提示,可能需要注册一下了,详见附件:

[attach]55239[/attach]

另外,根据风中漫步的要求,上传个动画:

[attach]55240[/attach]
********************************************************************************************************************
【新手入门】之一:If分支语句
【新手入门】之二:分支语句总结
【新手入门】之三:循环语句For
【新手入门】之四:循环语句Do和死循环
【新手入门】之五:公共变量与传址过程、传值过程
【新手入门】之六:“悲欢离合总无情”——浅谈Split和Join
【新手入门】之七:嵌套与并列——再谈If流程问题
【新手入门】之八:“连就连”——浅谈“&”和“+”连接符的区别

【新手入门】之九:从百钱百鸡谈起——浅谈“规划求解”兼答lingjiang问
【新手入门】之十:书到用时方恨少——自定义菜单(Access 2003)的制作
【新手入门】之十一:浅谈ADO之序言
【新手入门】之十二:浅谈ADO之Connection
【新手入门】之十三:浅谈ADO之Conmmand(上)
【新手入门】之十四:浅谈ADO之Command(下)
【新手入门】之十五:浅谈ADO之Recordset(上)
【新手入门】之十六:浅谈ADO之Recordset(下)
【新手入门】之十七:浅谈列表框的使用
【新手入门】之十八:双击列表框修改数据
【新手入门】之十九:从“书与女友恕不外借”谈起——浅谈“Bookmark”的使用
【新手入门】之二十:“书与书签”——bookmark属性答疑
【新手入门】之二十一:记录集的“凌迟”——逐条导出记录集

【新手进阶】之一:基础算法(一)
【新手进阶】之二:基础算法(二)
【新手进阶】之三:基础算法(三)
【新手进阶】之四:基础算法(四)
【新手进阶】之五:排序搜索(一)
【新手进阶】之六:排序搜索(二)
【新手进阶】之七:递归算法
【新手进阶】之八:冒泡排序
【新手进阶】之九:浅谈不绑定数据源操作记录
【新手进阶】之十:工作日的计算
【新手进阶】之十一:“庖丁解牛”和“纪昌学射”——浅谈表格式文本数据的导入
【新手进阶】之十二:从四脚腾空的奔马谈起——原来界面可以这样设计
【新手进阶】之十三:Outlook风格导航界面
【新手进阶】之十四:仓库管理系统
作者: tmtony    时间: 2014-11-13 11:37
谢谢分享
我还是钟情于ctExplorer
作者: tmtony    时间: 2014-11-13 11:38
这个效果还是挺不错。赞一个。
作者: roych    时间: 2014-11-13 11:39
tmtony 发表于 2014-11-13 11:37
谢谢分享
我还是钟情于ctExplorer

由于这个控件需要在客户端注册,觉得有些麻烦,只能在做成软件后,打包分发时处理了。
作者: tmtony    时间: 2014-11-13 11:40
但当一个选项组超过3个或更多,如何上下移动项目?
作者: leonshi    时间: 2014-11-13 12:31
最近版主高产啊
作者: roych    时间: 2014-11-13 12:59
tmtony 发表于 2014-11-13 11:40
但当一个选项组超过3个或更多,如何上下移动项目?

这个时候一般都是在右侧再加上一个ListView来显示子菜单的。我这里只是做一个类似于二级菜单之类的导航而已
作者: roych    时间: 2014-11-13 13:00
leonshi 发表于 2014-11-13 12:31
最近版主高产啊

其实很多是之前写过了,只是没时间整理,最近稍稍没那么忙就发上来了
作者: herry2003aa    时间: 2014-12-16 09:36
这个导航感觉特别高大上,但是打开使用出错,说使用了找不到函数名称
作者: roych    时间: 2014-12-16 13:36
herry2003aa 发表于 2014-12-16 09:36
这个导航感觉特别高大上,但是打开使用出错,说使用了找不到函数名称

可能access不怎么支持吧。逐个在标签里call它试试?例如:
Private Sub LblMenu1_Click()
Call GetMenu(Me.LblMenu1.Name)
End Sub
作者: 风中漫步    时间: 2014-12-16 13:50
木图啊?
无缘斑竹的大作甚是遗憾
作者: 风中漫步    时间: 2014-12-16 17:35
3Q3Q
作者: 风中漫步    时间: 2014-12-17 13:23
看图片很不错
不知窗口尺寸调整的因素考虑了否?
作者: roych    时间: 2014-12-17 14:51
风中漫步 发表于 2014-12-17 13:23
看图片很不错
不知窗口尺寸调整的因素考虑了否?

没有。图片是我之前上传的icon,大约是83×83的。
作者: xlb004    时间: 2015-1-10 19:48
6666
作者: xiaomachicehng    时间: 2015-1-13 16:32
学习学习
作者: AJKLS    时间: 2015-9-14 13:38
学习
作者: aaow@sina.com    时间: 2016-4-27 18:03
在重中之重重中之重重中之重重中之重重中之重重中之重
作者: Superleistung    时间: 2016-5-31 08:53
想实现这个效果
作者: zshining    时间: 2016-7-26 16:14
真厉害,佩服佩服
作者: harrysh    时间: 2018-3-15 14:03
效果不错。赞一个。
作者: hxx3970    时间: 2018-9-10 17:48
学习一下
谢谢!
作者: 点击快乐    时间: 2021-1-22 21:39
谢谢提供使用。学习!
作者: David1    时间: 2021-6-21 16:21
支持~!!
作者: 玉树TMD临风    时间: 2022-11-17 10:41
这是个好东西,收藏先




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3