我用VB6.0开发
我用了一个模块做WORD的评分模块。
word的模块里面有一个评分函数
函数根据给的当前题目的编号打开word在评分
函数大概如下
WordOpear(TestId as string)
{
'关闭所有word窗口
’根据TestId打开word
评分
}
问题很奇怪。当我评了第一题的时候。在评第二题的时候。就不行了。
这里我可以肯定不是判断的代码问题。
因为我先评了第二题，在评第一题的时候。第一题的也评不了。
评不了得意思就是没有任何异常的表现下，直接跳出了函数
评分的代码大噶如下
- VB code
Dim word As ObjectDim documents As ObjectSet word = CreateObject("word.application")Set documents = word.documents.Open(App.path + TestId )ActiveDocument.Content.Select....Selection.HomeKey Unit:=wdStory '在这里就会跳出函数------解决方案--------------------------------------------------------
先坐下,慢慢研究~~~
------解决方案--------------------------------------------------------
有点意思～！
------解决方案--------------------------------------------------------
设断点 跟踪调试 肯定有问题..
------解决方案--------------------------------------------------------
顶一下