VB 生成DLL加载word

各位大侠，我下面的附件目标是打开测试.doc，按下自定义菜单“写入”后，word文档出现123。（运行"安装.bat”即可加入菜单）
    但遗留三个未能解决的问题：
    1、怎样写代码使得word出现"123”字符串？
    2、想删除自定义菜单，不能通过卸载.bat。一定要手工重设菜单栏才行。有无其他解决方法？
    3、如果我想按下菜单“写入”即可启动程序，而不是出现下拉菜单再点击一次才能运行程序。应该怎样写？
请高手晒晒你们的绝招吧！跪谢！

解决了。这是一个复杂的问题，我基本上要重写所有VB代码。
有兴趣自己搜索Com加载的文章看看。