Hex(X) = "1E3C"是不是单击鼠标右键的意思？如果是，左键和双击是什么？

Question

Hex(X)是将X以十六进制表示出来。
Button才是左中右键。

Answer 1

因为代码中有me.popupmenu mnufile

Answer 2

是一个托盘程序里的代码
点鼠标右键可弹出菜单
我现在想我现在想改改
双击可弹出主窗口
哪位能帮帮我
Private Sub Form_Load()
    T.cbSize = Len(T)
    T.hwnd = Picture1.hwnd
    T.uID = 1&
    T.uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE
    T.uCallbackMessage = WM_MOUSEMOVE
    T.hIcon = Picture1.Picture
    T.szTip = "CDManage" & Chr$(0)
    Shell_NotifyIcon NIM_ADD, T
    Me.Hide
    App.TaskVisible = False
End Sub

Answer 3

哈哈，这是偷懒的办法。
正常办法应该是SubClass，然后应用自定义消息。但这样容易引起VB调试器崩溃，所以我们换了个方法，就是把
T.uCallbackMessage = WM_MY_TRAYMESSAGE
换成了
T.uCallbackMessage = WM_MOUSEMOVE
这样利用Windows存在的一个消息进行处理。此时
MouseMove(...) 的x就相当于被处理过的 wParam(与Windows消息有关的参数）。
这样经过实验，得到一个值，就被用来处理托盘程序了。

Answer 4

你可以用Debug.Print Hex(x)来看看不同鼠标操作对应的数值。
然后选取你需要的进行处理就可以了。