dll中VB6的代码:

Clipboard.SetText Addr

主程序中VB2010代码:

ProductInfo = Clipboard.GetText()

-----------------------------

看起来很正常的一段代码,一边放入剪贴板,一边取出。。。但是,事实上确实在XP下运行正常,一到WIN7就不行!

仔细去查VB6和VB2010中的Cilpboard的介绍,关于DataFormat

VB6有3种:

常数 描述
vbCFLink &HBF00 DDE 对话信息
vbCFText 1 (缺省值ÿ