vb控制QQ发送信息 不知道有没有更好的办法