vb引用MicrosoftWord 12.0 ObjectLibrary 提示加载DLL错误，怎么解决？

vb引用MicrosoftWord 12.0 ObjectLibrary 提示加载DLL错误，怎么解决？

12 貌似不支持VB调用的，

学习

dim xdocu as new word.application ' 定义一个word文档对象private sub command1_click() ' 点击按钮时执行的语句 xdocu.selection.shaperange.texteffect.presettexteffect = int(rnd(1) * 30) ' 把当前word文档中被选中 ' 的艺术字的样式设为一个数字，这个数字是由随机数函数rnd产生的 xdocu.selection.shaperange.texteffect.fontname = "宋体" ' 把该艺术字的字体设为 '“宋体” xdocu.selection.copy ' 复制选中的内容到剪贴板 me.picture = clipboard.getdata ' 把剪贴板的内容放到当前页的图片框中 end subprivate sub form_load() ' 窗体载入时运行的代码 xdocu.documents.add.select ' 加载word文档对象 xdocu.activedocument.shapes.addtexteffect(0, "word艺术字", "宋体", 32#, -1, 0, 10, 10).select ' 在当前活动的word文档中添加艺术字， ' 该艺术字的内容为“word艺术字”，字体为宋体，字号为32磅 end sub 这是vba语句代码，用vba操作word，帮助文档可以在word--〉宏--〉vb编辑器--〉帮助--〉microsoft visual basic帮助中查找