取剪辑板文本GetClipboardData函数

.如果真 (IsClipboardFormatAvailable (#无法载入的常量)) '
hMem ＝ 取剪贴板数据句柄_ (#无法载入的常量) '
lpData ＝ 锁住全局内存块_ (hMem)
nSize ＝ GlobalSize (hMem)
s ＝ 取空白字节集 (nSize)
拷贝内存_ (取变量数据地址 (s), lpData, nSize)
解锁全局内存块_ (hMem)
返回值 ＝ Unicode转Ansi (到字节集 (s)) ' 系统底层是unicode和ansi编码
.如果真结束
关闭剪辑板_ ()
返回 (返回值)