自定义聊天菜单

单击内置聊天窗口右上角的按钮，会弹出一个菜单，我们可以对这个菜单进行自定义。

自定义聊天菜单很简单，设置QQClint的MenuItems属性即可，例如：

QQClient.MenuItems = "自定义项目之一|自定义项目之二|-|自定义项目之三"

执行上述代码后，打开内置聊天窗口，菜单会变为：

提示：

1、符号"-"在对应位置插入一个分割条。
2、需要在打开内置聊天窗口之前设置MenuItems，否则不会生效。

如果在设置MenuItems属性时，以符号"|"开头，则会保留原有菜单项目，例如：

QQClient.MenuItems = "|自定义项目之一|自定义项目之二|-|自定义项目之三"

菜单将变为：

单击自定义菜单后，会触发事件CustomMenuClick，通常将该事件的代码设置为：

Select e.MenuText
    Case "自定义项目之一"
        '要执行的代码
    Case "自定义项目之二"
        '要执行的代码
    Case "自定义项目之三"
        '要执行的代码
End Select

如果要根据当前选定用户和消息内容动态显示不同的菜单，可以在BeforeShowMenu事件设置代码，例如：

If e.BuddyName.StartsWith("生产部.") Then '如果当前用户的分组是生产部
    QQClient.MenuItems = "生产部菜单项之一|生产部菜单项之二"
ElseIf e.BuddyName.StartsWith("销售部.") Then '如果当前用户的分组是销售部
    QQClient.MenuItems = "销售部菜单项之一|销售部菜单项之二"
Else
    QQClient.MenuItems = "|"  '使用默认菜单
End If