请教！

sirlotus · 发表于 2002-4-15 14:37

1、如何判断模板中的某个模块是否存在？ 2、用vb如果通过程序在word模板中创建“用户窗体”并在窗体中添加一个控件？谢谢！

sirlotus · 发表于 2002-4-15 17:15

不会没人知道吧，我可全靠各位大虾了！

sirlotus · 发表于 2002-4-15 17:58

好，明天你一定要帮我呀！

sirlotus · 发表于 2002-4-17 09:09

谢谢斑竹！搞定了：）还有一个小问题请教斑竹：如何通过程序隐藏word菜单栏中某一菜单下的某一项？

sirlotus · 发表于 2002-4-17 11:17

我试了可以，不过我在哪里可以找到所有菜单的名字比如:"文件--file",子菜单能否不用索引号来定位，用名字可以吗，如果可以各级名字子菜单在哪里可以找到？小弟罗嗦啦...

sirlotus · 发表于 2002-4-17 13:02

哦，谢谢：）我在使用vb创建或修改word模板中的设计时，能否实现所有操作过程不可见都在后台执行，用户应该感觉不出我在修改他的word模板，否则给用户一个非常不好的感觉。现在的情况是创建过程前台总有闪烁的情况。

sirlotus · 发表于 2002-4-17 15:05

不行啊，还是可以看到，连刚刚创建的表单也可以看到，好像打开和关闭都可以看到虽然只是一闪感觉也不好！！

sirlotus · 发表于 2002-4-17 16:03

你那段代码确实不显示，在加上这句试试， With app.Templates("Normal.dot").VBProject.VBComponents("ThisDocument").CodeModule .DeleteLines 1, .CountOfLines '删除全部代码 .CreateEventProc "Open", "Document" .InsertLines 2, "Msgbox""打开文档就会自动运行." .InsertLines 3, "msgbox""sh" End With 能解决吗？

sirlotus · 发表于 2002-4-17 17:39

那怎么办哪，那种效果你也看到了，用户是无法接受的，看来这下我死定了！！！

sirlotus · 发表于 2002-4-17 17:42

if “比较难”=“实现不了” then msgbox "我完了，死翘翘了！！" else msgbox "：）狂歌劲舞，大大的请客！" end if

		自动登录	找回密码
密码			免费注册