Chinaunix首页 | 论坛 | 博客
  • 博客访问: 188437
  • 博文数量: 106
  • 博客积分: 3810
  • 博客等级: 中校
  • 技术积分: 1007
  • 用 户 组: 普通用户
  • 注册时间: 2009-03-18 13:35
文章分类

全部博文(106)

文章存档

2014年(17)

2011年(5)

2010年(75)

2009年(9)

我的朋友

分类: Windows平台

2014-02-12 23:52:05

ClipBoard
    简介:创建剪切板对象,比VB自带的对象好用。
    备注:这个对于使用Office的VBA的人来说,绝对是一个福音。在vba中要使用剪切板,得翻山越岭才能使用,而且相当艰难。
          对于Office各个程序间传递数据,在某些场合下,使用好剪切板,性能会成百倍增强,而且方便。
    原型:Function ClipBoard() As cUniClipBoard
方法
Clear()
原型:Sub Clear()
GetData()
原型:Function GetData([Format]) As StdPicture
GetFiles()
原型:Function GetFiles() As cDataObjectFiles
GetFormat()
原型:Function GetFormat(Format As Integer) As Boolean
GetFormats()
原型:Function GetFormats()
GetFormatString()
原型:Function GetFormatString(Format As Long) As String
GetImageSurface()
原型:Function GetImageSurface() As cCairoSurface
GetText()
原型:Function GetText([Format As ClipBoardFormats = CF_TEXT]) As String
SetData()
原型:Sub SetData(Picture As StdPicture, [Format])
SetFiles()
原型:Sub SetFiles(FileList As cDataObjectFiles)
SetImageSurface()
原型:Sub SetImageSurface(ImageSrf As cCairoSurface)
SetText()
原型:Sub SetText(S As String, [Format As ClipBoardFormats = CF_TEXT])
阅读(625) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~