以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  金字塔软件问题提交  (http://weistock.com/bbs/list.asp?boardid=2)
----  64位的VBA问题  (http://weistock.com/bbs/dispbbs.asp?boardid=2&id=79574)
--  作者：stockwiner
--  发布时间：2015/6/10 8:56:32
--  64位的VBA问题
原32位的VBA,粘贴到64位,出现如图错误,是不是有东西没装?

图片点击可在新窗口打开查看此主题相关图片如下：捕获.png
图片点击可在新窗口打开查看
--  作者：stockwiner
--  发布时间：2015/6/10 8:57:34
--  
Gloable 模块, 起始位置

public  wrap
 Set Wrap = CreateObject("DynamicWrapper")
    Wrap.Register "user32.dll","FindWindowA","i=ss","f=s", "r=l"
    Wrap.Register "user32.dll","FindWindowExA","i=llss","f=s", "r=l"
    Wrap.Register "user32.dll","SendMessageA","i=lull","f=s", "r=l"
 public   WM_LBUTTONDOWN
 public   WM_LBUTTONUP
 PUBLIC WM_CLOSE
--  作者：yukizzc
--  发布时间：2015/6/10 9:04:32
--  
DynamicWrapper这个对象只能用在32位版本上
--  作者：stockwiner
--  发布时间：2015/6/10 9:06:45
--  
那怎么办?
无解?
--  作者：yukizzc
--  发布时间：2015/6/10 9:10:46
--  

没有办法。。。