| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3885 人关注过本帖
标题:如何关闭“剪贴板”?
只看楼主 加入收藏
ictest
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:333
专家分:114
注 册:2010-2-17
结帖率:70%
收藏
 问题点数:0 回复次数:3 
如何关闭“剪贴板”?
如果我先运行了EXCEL并在其中剪贴粘贴了(我想肯定是剪贴板被此程序所用),然后再运行了我的程序,总是出现521错误,不能打开剪贴板,用什么语句能在我程序运行前先关闭所有使用剪切板的程序呢?我的程序中用到了如下语句:SavePicture Clipboard.GetData, "c:\aa.bmp"
不知我是否说明白了?
搜索更多相关主题的帖子: 剪贴板 
2010-03-30 13:42
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:0 
不知是不是你所要的效果。

If Not Clipboard.GetData(vbCFBitmap) = 0 Then                       '如果返回的不是0
    SavePicture Clipboard.GetData(vbCFBitmap), "c:\aa.bmp"          '保存图像
End If

授人于鱼,不如授人于渔
早已停用QQ了
2010-03-30 17:08
bczgvip
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:66
帖 子:1310
专家分:5312
注 册:2009-2-26
收藏
得分:0 
程序代码:
    Dim pPic As StdPicture
    Set pPic = Clipboard.GetData
    If pPic Is Nothing Or pPic.Handle = 0 Then
    Else
        SavePicture pPic, "c:\test.bmp"
    End If
2010-03-30 17:11
ictest
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:333
专家分:114
注 册:2010-2-17
收藏
得分:0 
对不起,好像还是不对,我再详细说明一下我的步骤:
1、先打开EXCEL,随意输入,然后Ctrl+c两次,屏幕右方出现office剪贴板,内有要粘贴的项目。
2、运行我的软件(没有关闭Excel),出现521错误,提示“不能打开剪贴板”。
3、重新进入先前打开的Excel,“全部清空”剪贴板,再点“剪贴板”三个字后面的“叉”,关闭剪贴板。
4、运行我的程序,一切正常,C盘根目录下出现BMP文件。
在程序里,我用到了这个语句:SavePicture Clipboard.GetData, "c:\aa.bmp"
我估计,如有别的程序首先使用到剪贴板,我的程序就要出错(没有试过)。
有没有办法先关闭别的软件使用中的剪贴板,应该怎样编写呢?我好替换我的上面这条语句。
2010-03-30 21:28
快速回复:如何关闭“剪贴板”?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.028095 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved