VBA调用QQ时，遇到的问题

dsyxr

电脑上挂了两个QQ号码，
ShellExecute 0, "open", "tencent://message/?uin=202812988 "&Site=LG&Menu=yes", "", "", 1

用这句代码时，会出现选择号码对话框(如图）


现在不想让出现这个选择号码对话框，直接选用350351319这个号码，该如何修改代码呢？
简单点说，就是想直接用350351319的号码和202812988对话。
自己水平有限，想解决又无能为力，请老师赐教，万分感谢。