50分===谁能看懂这段代码?

user88 2005-10-03 11:06:27
' notification messages:
Public Const TBN_LAST = &H720
Public Const TBN_FIRST = -700&
Public Const TBN_GETBUTTONINFOA = (TBN_FIRST - 0)
Public Const TBN_GETBUTTONINFOW = (TBN_FIRST - 20)
Public Const TBN_BEGINDRAG = (TBN_FIRST - 1)
Public Const TBN_ENDDRAG = (TBN_FIRST - 2) '2
Public Const TBN_BEGINADJUST = (TBN_FIRST - 3)
Public Const TBN_ENDADJUST = (TBN_FIRST - 4)
Public Const TBN_RESET = (TBN_FIRST - 5)
Public Const TBN_QUERYINSERT = (TBN_FIRST - 6)
Public Const TBN_QUERYDELETE = (TBN_FIRST - 7)
Public Const TBN_TOOLBARCHANGE = (TBN_FIRST - 8)
Public Const TBN_CUSTHELP = (TBN_FIRST - 9)
Public Const TBN_CLOSEUP = (TBN_FIRST - 11)

这是定义工具栏按钮事件的,可是没有onClick事件,那么
Public Const TBN_ONCLICK = ??多少
...全文
113 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
province_ 2005-10-04
  • 打赏
  • 举报
回复
Private Const TBN_BEGINADJUST As Long = (TBN_FIRST-3)
Private Const TBN_BEGINDRAG As Long = (TBN_FIRST-1)
Private Const TBN_CUSTHELP As Long = (TBN_FIRST-9)
Private Const TBN_DRAGOUT As Long = (TBN_FIRST - 14)
Private Const TBN_DROPDOWN As Long = (TBN_FIRST - 10)
Private Const TBN_ENDADJUST As Long = (TBN_FIRST-4)
Private Const TBN_ENDDRAG As Long = (TBN_FIRST-2)
Private Const TBN_FIRST As Long = (-700)
Private Const TBN_GETBUTTONINFOA As Long = (TBN_FIRST-0)
Private Const TBN_GETBUTTONINFOW As Long = (TBN_FIRST - 20)
Private Const TBN_GETDISPINFOA As Long = (TBN_FIRST - 16)
Private Const TBN_GETDISPINFOW As Long = (TBN_FIRST - 17)
Private Const TBN_GETINFOTIPA As Long = (TBN_FIRST - 18)
Private Const TBN_GETINFOTIPW As Long = (TBN_FIRST - 19)
Private Const TBN_GETOBJECT As Long = (TBN_FIRST - 12)
Private Const TBN_HOTITEMCHANGE As Long = (TBN_FIRST - 13)
Private Const TBN_INITCUSTOMIZE As Long = (TBN_FIRST - 23)
Private Const TBN_LAST As Long = (-720)
Private Const TBN_QUERYDELETE As Long = (TBN_FIRST-7)
Private Const TBN_QUERYINSERT As Long = (TBN_FIRST-6)
Private Const TBN_RESET As Long = (TBN_FIRST-5)
Private Const TBN_RESTORE As Long = (TBN_FIRST - 21)
Private Const TBN_SAVE As Long = (TBN_FIRST - 22)
Private Const TBN_TOOLBARCHANGE As Long = (TBN_FIRST-8)
熊孩子开学喽 2005-10-04
  • 打赏
  • 举报
回复
定义常量而已。
另外,我只看到20分,不要摆什么噱头说50哦
proer9988 2005-10-03
  • 打赏
  • 举报
回复
参考一下Windows消息大全使用详解
http://www.daima.com.cn/Info/106/Info35220/
xxw19820907 2005-10-03
  • 打赏
  • 举报
回复
帮顶一下/1

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧