登陆界面?相当于双击QQ图标?这个你需要找到QQ的路径才行
如果你要给某个QQ发信息,可以用下面代码
Dim Proc As New ProcessProc.File = "tencent://message/?uin=" & Tables("表A").Current("QQ")Proc.Start()