Foxtable(狐表)用户栏目专家坐堂 → [求助]如何清除或者终止截图后粘贴板 (已解决)


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

主题:[求助]如何清除或者终止截图后粘贴板 (已解决)

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


加好友 发短信
等级:四尾狐 帖子:837 积分:7217 威望:0 精华:0 注册:2017/8/31 12:07:00
[求助]如何清除或者终止截图后粘贴板 (已解决)  发帖心情 Post By:2022/11/14 15:50:00 [显示全部帖子]

老师,有以下截图代码,第一次截图成功后,第二次截图时选择区域后点击“×”还是能够保存,好像是ClipBoard.GetImage(粘贴板)上内容不为空造成的,麻烦帮忙解决一下,谢谢!
Dim proc As New Process 
proc.File = ApplicationPath & "capture.exe"
proc.WaitForClose = True
proc.Start
Dim fl2 As String = ProjectPath & "Reports\" & Format(Date.Now , "yyyyMMddHHmmss") & CStr (Rand.Next(10000, 99999)) & ".png"
If ClipBoard.GetImage IsNot Nothing Then
    ClipBoard.GetImage.save(fl2)
Else
    MessageBox.Show("截图失败,请重新截图!", "提示")
    Return 
End If

解决代码:
 ClipBoard.Clear '清除粘贴板
[此贴子已经被作者于2022/11/14 16:21:06编辑过]

 回到顶部