Office Outlook同步 很奇怪的BUG

最近一个项目中有一个与Office Outlook同步的模块，是我用VB6.0开发的ActiveX IE插件，现客户那出现错误，我逐步测试总结情况如下：
            1.客户环境XP sp2+Outlook2003，我做了一个CS测试程序执行同样代码，Outlook打开时执行出错的情况很少，但没有打开Outlook测试出错概率大于50%，我做了一个干净的系统XP sp2+Outlook2003,运行同样测试程序无论是否打开Outlook都没有错误。   
            2.在客户处安装开发环境，单步执行，没有错误；设置断点跳跃执行，出错；
            3.反复设断点测试，找到出错位置在如下代码：

1 Dim  objApp  As  Outlook.Application
2 Dim  objNameSpace  As  Outlook.NameSpace
3 Dim  objMAPIFolder  As  Outlook.MAPIFolder
4 Set  objApp  =   New  Outlook.Application
5 Set  objNameSpace  =  objApp.GetNamespace(Type: = " MAPI " )
6 Set  objMAPIFolder  =  _
7         objNameSpace.GetDefaultFolder(FolderType: = olFolderTasks)

出错位置在第6行，但有如下情况：
在第6行设置断点，运行到该断点处，单步执行出错；
在第4行设置断点，运行到该断点处，单步执行，第6行运行正常；
            4.出错几次后，Outlook会崩溃，发送错误报告，提示重启；
            大家谁做过OFFICE编程，帮忙判断一下错误可能出在哪，上网查找了好久也没有找到相似问题的解决方案。

同步源码 

附：错误提示基本上是“操作失败”，错误来源是Outlook；用外部程序调用outlook，每次都弹出一个烦人的提示窗体，可能是提示窗体没有创建成功发生错误。