| 楼主 xyh9999 |
介绍2个自定义函数:LqcClipToFile,LqcFileToClip 一、LqcClipToFile(cFullFile, Optional nDel = 0) '把剪贴板数据写入文件cFullFile 'nDel:1-删除已有的同名文件 其他-不删除已有的同名文件 默认不删除文件 '说明:返回True 如：在立即窗口中用 ? LqcClipToFile("c:\1.txt")则返回True,同时将剪贴板数据加入c:\1.txt中。 如：在立即窗口中用 ?LqcClipToFile("c:\1.txt"，1)则返回True,同时将剪贴板数据覆盖写入c:\1.txt中。 二、LqcFileToClip(cFullFile) '把文件cFullFile中的数据写入剪贴板 'nDel:1-删除已有的同名文件 其他-不删除已有的同名文件 '说明:返回True 如：在立即窗口中用 ? LqcFileToClip("c:\1.txt")则返回True,同时将C:\1.txt的内容写入剪粘板中。可用ctr+V看看剪粘板中的内容.  ET发贴20100801B.rar |
| 2楼 水吉果果 |
学习1!!!!! |