主题：在窗口中：用哪个控件可以把列为：QQ，旺旺的打开？

直接运行代码

msn

msnim:chat?contact=你的用户名

qq

tencent://message/?uin=你的QQ号码

旺旺

http://www.taobao.com/webww/ww.php?ver=3&siteid=cntaobao&status=1&touid=旺旺号

或者 wangwang:SendIM?旺旺号

skepy

callto://Skype账号

使用

Dim proc As new Process
proc.File = "http://www.taobao.com/webww/ww.php?ver=3&siteid=cntaobao&status=1&touid=" & Tables("表A").Current("旺旺号")
proc.start