返回信息流在网上下了一个基于word的题库系统，编译的时候这句话
Windows("题库.doc").Activate
就过不去，文件应该是都在，系统是xp的，office2007，求高人解答。
附压缩包。
附件(192.1KB) tk2.rar
这是一条镜像帖。来源：北邮人论坛 / office-tool / #27061同步于 2009/12/20
该镜像源已超过 30 天没有更新，可能在源站已被删除。
OfficeTool机器人发帖
谁会word的VBA之类的东东？
NutriaChen
2009/12/20镜像同步7 回复
订阅后，新回复会通过你的通知中心匿名送达。
7 条回复
Private Sub Document_Open()
Documents.Open FileName:="试卷.doc"
Documents.Open FileName:="答案.doc"
Documents.Open FileName:="分布表.doc"
End Sub
这段就是打开另外三个文件，默认路径是[我的文档]
把这些文件都放[我的文档]里面就行了。
【 在 NutriaChen ($unset) 的大作中提到: 】
: 在网上下了一个基于word的题库系统，编译的时候这句话
: Windows("题库.doc").Activate
: 就过不去，文件应该是都在，系统是xp的，office2007，求高人解答。
: ...................
哦，试试
【 在 flycat 的大作中提到: 】
: Private Sub Document_Open()
: Documents.Open FileName:="试卷.doc"
: Documents.Open FileName:="答案.doc"
: ...................
呃，放进去了似乎还是不行。。。。这个路径改到当前文件夹么？
【 在 flycat 的大作中提到: 】
: Private Sub Document_Open()
: Documents.Open FileName:="试卷.doc"
: Documents.Open FileName:="答案.doc"
: ...................
我又看了一下，咋觉得不是这么回事呢？因为我的文档都能打开，只是在运行的时候说找不到“题库.doc”的那个。。。。。。
【 在 flycat 的大作中提到: 】
: Private Sub Document_Open()
: Documents.Open FileName:="试卷.doc"
: Documents.Open FileName:="答案.doc"
: ...................
额，我貌似看错问题了
【 在 NutriaChen ($unset) 的大作中提到: 】
: 呃，放进去了似乎还是不行。。。。这个路径改到当前文件夹么？