Foxtable(狐表)用户栏目专家坐堂 → [求助]按钮


  共有2263人关注过本帖树形打印复制链接

主题:[求助]按钮

帅哥哟,离线,有人找我吗?
江南小镇
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1765 积分:11811 威望:0 精华:0 注册:2015/6/22 8:11:00
[求助]按钮  发帖心情 Post By: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

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/4 9:08:00 [只看该作者]

Dim Proc As New Process
Proc.File = "tencent://message/?uin=" & forms("窗口1").controls("TextBox1").Text
Proc.Start()

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1765 积分:11811 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2019/1/4 12:44:00 [只看该作者]

谢谢老师

 回到顶部