做个按钮单独执行就好。比如代码
Dim proc As new Processproc.File = "tencent://message/?uin=" & e.form.Controls("ComboBox1").Text
proc.start