VB打造超酷个性化菜单(3)

日期：2008年5月11日作者：查看:[大字体中字体小字体]

　　源代码下载：点击这里下载(28K, winzip压缩文件)现在到了最关键，最精彩，也是最复杂的部分了。我们最关心的就是怎样“画”菜单，怎样处理菜单事件，在MenuWndProc这个处理消息的函数里，我们要处理如下消息：WM_COMMAND（单击菜单项），WM_MEASUREITEM（处理菜单高度和宽度），WM_MENUSELECT（选择菜单项），WM_DRAWITEM（绘制菜单项）。

打开上次建好的工程，添加一个标准模块，并将其名称设置为mMenu，代码如下：

'*****************************************************
'* 本模块配合 cMenu 菜单类模块
'*
'* 版权: LPP软件工作室
'* 作者: 卢培培(goodname008)
'* (******* 复制请保留以上信息 *******)
'*****************************************************
Option Explicit
'-=-=-=-=-=-=-=-=-=-=-=-=-=- API 函数声明 -=-=-=-=-=-=-=-=-=-=-=-=-=-Public Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long,
ByVal x As Long, ByVal y As Long, ByVal nWidth As Long,
ByVal nHeight As Long, ByVal hSrcDC As Long,
ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Public Declare Function CallWindowProc Lib "user32" Alias
"CallWindowProcA" (ByVal lpPrevWndFunc As Long,
ByVal hwnd As Long, ByVal Msg As Long, ByVal wParam As Long,
ByVal lParam As Long) As Long
Public Declare Function CreateCompatibleDC Lib "gdi32"
(ByVal hdc As Long) As Long
Public Declare Function CreatePen Lib "gdi32" (ByVal nPenStyle As Long,
ByVal nWidth As Long, ByVal crColor As Long) As Long
[1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] [21] [22] [23] 下一页
VB打造超酷个性化菜单(3) 相关文章：
·Windows Vista中如何显示“超级隐藏”文件
·超级兔子虚拟磁盘加速器 1.0下载
·XPSP3性能超越SP2 VistaSP1令人失望
·QQ黑金版曝光超级科幻功能
·微软：IE安全性远超Firefox
·Fireworks制作超酷质感按钮
·PS教程打造超炫的海报立体光芒字
·完全免费教你用QQLive看免费英超
·录入高手输入法通用超级技巧
·超站大赛32强王景琳：业内没有竞争对手
VB打造超酷个性化菜单(3) 相关软件
·学校源码管理系统超靓版V2008
·超级QQ记牌器
·超能力侦探
·超级经典CS作弊器
·《超级马利奥64 DS》模拟器下载
·超任游戏《实况足球4》模拟器
·《超级马里奥银河》新视频及画面公布
·《雷电超激版》游戏试玩
·《仙剑奇侠传三外传》繁体版超级存档修改器
·《超级平衡球》益智滚动游戏试玩

上一篇:VB打造超酷个性化菜单(1)

下一篇:利用vb实现“绿色”软件

特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

VB打造超酷个性化菜单(3)

精品推荐

热点TOP10

特别推荐