Foxtable(狐表)用户栏目专家坐堂 → [分享]窗口双击复制命令


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

主题:[分享]窗口双击复制命令

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


加好友 发短信
等级:四尾狐 帖子:837 积分:7217 威望:0 精华:0 注册:2017/8/31 12:07:00
[分享]窗口双击复制命令  发帖心情 Post By:2017/12/14 11:36:00 [只看该作者]

以下是窗口“DoubleClick”事件代码:

 

If e.Sender.Text = "" Then

      MessageBox.Show("空值,无法复制!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

Else

      ClipBoard.SetText(e.Sender.Text)

      MessageBox.Show("已复制!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

End If

[此贴子已经被作者于2017/12/14 12:01:35编辑过]

 回到顶部