求教：能否用VB发送信息到指定的QQ号码呢？怎样实现？

来源：百度知道 编辑：UC知道 时间：2024/05/26 15:17:15

Public Sub QQ()
ShellExecute 0, "open", "tencent://message/?uin=QQ号码&Site=留言&Menu=yes", "", "", 1
End Sub

上边这是个呼叫QQ的例子子

Public Sub QQ()
ShellExecute 0, "open", "tencent://message/?uin=QQ号码&Site=留言&Menu=yes", "", "", 1
End Sub

问题有点专业了,分数不够

这么复杂的问题才给20分

楼上的 汗一个！