VB高手进,急急急!

哪位大哥知道剪切,复制,粘贴命令代码!谢谢了!
2024-12-27 21:47:56
推荐回答(1个)
回答1:

====================================================================
Clipboard 对象

提供对系统 Clipboard 的访问。

语法

Clipboard

说明

Clipboard 对象用于操作剪贴板上的文本和图形。它使用户能够复制、剪切和粘贴应用程序中的文本和图形。在复制任何信息到 Clipboard 对象中之前,应使用 Clear 方法清除 Clipboard 对象中的内容,例如 Clipboard.Clear。

注意所有 Windows 应用程序共享 Clipboard 对象,因此当切换到其它应用程序时,剪贴板内容会改变。

Clipboard 对象可包含多段数据,只要每段数据的格式不同。例如,可用 SetData 方法把位图以 vbCFDIB 格式放到 Clipboard 中,接着再用 SetText 方法以 vbCFText 格式将文本放到 Clipboard 中。然后用 GetText 方法检索文本或用 GetData 方法检索图形。当用代码或菜单命令把另一段数据放到 Clipboard 中时,原 Clipboard 中相同格式的数据会丢失。

====================================================================

GetText 方法

用于返回 Clipboard 对象中的文本字符串。不支持命名参数。

语法

object.GetText (format)

GetText 方法的语法包含下列部分:

部分 描述
object 必需的。一个对象表达式,其值为“应用于”列表中的一个对象。
format 可选的。一个数值或常数,如“设置值”中所描述的,它指定 Clipboard 对象的格式。必须用括号将常数或数值括起来。

设置值

format 的设置值有:

常数 值 描述
vbCFLink &HBF00 DDE 对话信息
vbCFText 1 (缺省值)文本
vbCFRTF &HBF01 RTF(.rtf 文件)

说明

上述常数在 Visual Basic (VB)对象浏览器中的对象库里列出。

如果 Clipboard 对象中没有与期望的格式相匹配的字符串,则返回一个零长度字符串 ("")。

====================================================================

SetText 方法

用以使用指定的 Clipboard 图象格式将文本字符串放到 Clipboard 对象中。不支持命名参数。

语法

object.SetText data, format

SetText 方法的语法包含下列部分:

部分 描述
object 必需的。一个对象表达式,其值为“应用于”列表中的一个对象。
data 必需的。是被放置到剪贴板中的字符串数据。
Format 可选的。一个常数或数值,按照下列“设置值”中的描述,指定 Visual Basic 识别的剪贴板格式。

设置值

用于 format 的设置值有:

常数 值 描述
vbCFLink &HBF00 DDE 对话信息
vbCFRTF &HBF01 RTF 格式
vbCFText 1 (缺省值)文本

说明

上述常数在对象浏览器中的 Visual Basic (VB) 对象库里列出。

====================================================================

Clear 方法(Clipboard、ComboBox、ListBox)

用于清除 ListBox,ComboBox 或系统剪贴板的内容。

语法

object.Clear

object 所在处代表一个对象表达式,其值为“应用于”列表中的一个对象。

说明

绑定到 Data 控件的 ListBox 或 ComboBox 控件不支持 Clear 方法。
====================================================================

GetData 方法

用于从 Clipboard 对象返回一个图形。不支持命名参数。

语法

object.GetData (format)

GetData 方法的语法包含下列部分:

部分 描述
object 必需的。一个对象表达式,其值为“应用于”列表中的一个对象。
format 可选的。一个常数或数值,如“设置值”中所描述的,它指定 Clipboard 图形的格式。必须用括号将该常数或数值括起来。如果 format 为 0 或省略,GetData 自动使用适当的格式。

设置值

format 的设置值有:

常数 值 描述
vbCFBitmap 2 位图(.bmp文件)
vbCFMetafile 3 元文件(.wmf文件)
vbCFDIB 8 设备无关位图 (DIB)
vbCFPalette 9 调色板

说明

上述常数在 Visual Basic (VB) 对象浏览器中的对象库里列出。

如果 Clipboard 对象没有与期望的格式相匹配的图形,则返回空。如果 Clipboard 对象中只有一个调色版,则创建最小尺寸 (1x1) 的 DIB。

====================================================================

SetText 方法

用以使用指定的 Clipboard 图象格式将文本字符串放到 Clipboard 对象中。不支持命名参数。

语法

object.SetText data, format

SetText 方法的语法包含下列部分:

部分 描述
object 必需的。一个对象表达式,其值为“应用于”列表中的一个对象。
data 必需的。是被放置到剪贴板中的字符串数据。
Format 可选的。一个常数或数值,按照下列“设置值”中的描述,指定 Visual Basic 识别的剪贴板格式。

设置值

用于 format 的设置值有:

常数 值 描述
vbCFLink &HBF00 DDE 对话信息
vbCFRTF &HBF01 RTF 格式
vbCFText 1 (缺省值)文本

说明

上述常数在对象浏览器中的 Visual Basic (VB) 对象库里列出。

====================================================================

GetFormat 方法

返回一个整数,指出 Clipboard 对象中的项目是否匹配期望的格式。不支持命名参数。

语法

object.GetFormat (format)

GetFormat 方法的语法包含下列部分:

部分 描述
object 必需的。一个对象表达式,其值为“应用于”列表中的一个对象。
format 必需的。一个数值或常数,如“设置值”中所描述的,它指定 Clipboard 对象的格式。必须用括号包括该常数或数值。

设置值

用于 format 的设置值有:

常数 值 描述
vbCFLink &HBF00 DDE对话信息
vbCFText 1 文本
vbCFBitmap 2 位图(.bmp 文件)
vbCFMetafile 3 元文件(.wmf 文件)
vbCFDIB 8 设备无关位图 (DIB)
vbCFPalette 9 调色板

说明

上述常数在 Visual Basic (VB) 对象浏览器中的对象库里列出。

如果 Clipboard 对象中一个项目匹配指定的格式,则 GetFormat 方法返回 True。否则,返回 False。

对于 vbCFDIB 和 vbCFBitmap 两种格式,显示图形时不管 Clipboard 中是什么样的调色板都要使用。