新浪cn邮箱登陆:这些是什么意思啊,VB的

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 10:52:40
Private Sub CmdCopy_Click()
Clipboard.SetText TxtContent.SelText
End Sub
Private Sub CmdPaste_Click()
TxtContent.SelText = Clipboard.GetText
End Sub
说得祥细一点,我只知道这些是复制和粘贴而以

Private Sub CmdCopy_Click()
'这只是按钮代码的起始而已,按钮名叫做CmdCopy,事件是单击
Clipboard.SetText TxtContent.SelText
'Clipboard指剪贴板;SetText是剪贴板对象的一个方法,用来设置剪贴板的内容;TxtContent是指一个文本框;SelText是文本框的一个属性,指文本框的内容
'翻译过来就是把剪贴板的内容设为文本框的内容,就是复制(因为原内容并没有消失,要实现剪切,在这句后面加一句TxtContent.SelText = "")
End Sub
'代码完毕
Private Sub CmdPaste_Click()
'按钮名叫CmdPaste,事件是单击
TxtContent.SelText = Clipboard.GetText
'TxtContent.SelText参见上文。Clipboard仍然指剪贴板,GetText指剪贴板的内容,是一个属性)
'翻译过来就是把文本框的内容设为剪贴板的内容,就是粘贴了
End Sub
'代码完毕

建立菜单或命令按扭
编辑
...复制(CmdCopy)
...粘贴(CmdPaste)
点击复制(CmdCopy)
复制所选文本
点击粘贴(CmdPaste)
粘贴以复制的文本!
!!比如:再记事本中的 复制和粘贴代码就是这个样子的!!

主要是知道seltext属性是用来标志选定正文的内容的!
第一个过程是将选中的文本存到剪贴板clipboard中(相当于复制)
第二个过程是将txtcontent的文本置为剪贴板中的文本(相当于粘贴)
从而达到复制粘贴的作用

ps:Clipboard 对象用于操作剪贴板上的文本和图形。它使用户能够复制、剪切和粘贴应用程序中的文本和图形。
GetText 方法:用于返回 Clipboard 对象中的文本字符串。
SetText 方法:用以使用指定的 Clipboard 图象格式将文本字符串放到 Clipboard 对象中。