以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]按钮 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=129697) |
-- 作者:江南小镇 -- 发布时间:2019/1/4 8:50:00 -- [求助]按钮 老师,我想把下代码改成按钮代码从文本框中获取数据打开QQ交流界面。 If not e.Row.Isnull("qq") Then Dim Proc As New Process Proc.File = "tencent://message/?uin=" & e.Row("QQ") Proc.Start() e.cancel = True End If
|
-- 作者:有点甜 -- 发布时间:2019/1/4 9:08:00 -- Dim Proc As New Process
Proc.File = "tencent://message/?uin=" & forms("窗口1").controls("TextBox1").Text
Proc.Start()
|
-- 作者:江南小镇 -- 发布时间:2019/1/4 12:44:00 -- 谢谢老师 |