1.在QQ和别人聊天窗口中自动写入内容并发送的源码vb源码应该怎么写

在QQ和别人聊天窗口中自动写入内容并发送的vb源码应该怎么写

       Private Sub Command1_Click()

       AppActivate "你的QQ聊天窗口标题栏名字"

       SendKeys "什么内容" & vbCrlf

       End Sub

       用这个命令，就行了