vb6如何自行生成一个类似于OLEDragDrop事件中使用的dataobject对象？

最近有种需求需要自行生成一个DataObject对象，在其中加入我自行模拟拖拽产生的文件，但是发现new DataObject不可以使用，一用就说“无效使用new关键字”，但是使用CreateOjbect（）的话又不知道其参数"应用程序名称.类"怎么填,以及是否可行。
我使用VB6，求指教，感激不尽。 --------------------编程问答-------------------- 你得知道自己想引用的对象是什么吧, 要么工程中添加, 要么完全手工代码实现一个.

补充：VB ,  API