Question

问一个关于使用SetClipboardData找不到函数入口的问题？

这个函数已经做了API申明，相关常量也做了了声明！
Private Declare Function SetClipboardData Lib "user32" Alias "SetClipboardDataA" (ByVal wFormat As Long, ByVal hMem As Long) As Long
Private Const CF_TEXT = 1

SetClipboardData CF_TEXT, hGlobal ‘hGlobal 一个字符串的句柄

<以上为部分代码>

运行时,提示错误信息: 实时错误:453 找不到DLL入口点 SetClipboardDataA in user32

请问下高手是怎么回事?

Answer 1

这样改就行了：
Private Declare Function SetClipboardData Lib "user32" (ByVal wFormat As Long, ByVal hMem As Long) As Long