调试程序中出现如下错误，因突然出现此错误，所以百思不得其解，望高手解答。

调试程序中出现如下错误，因为以前调试时都是好好的，这次突然出现，所以百思不得其解，不知是否是VB有问题了。望高手解答。
运行时错误'-2147319779(8002801d)':
Automation 错误
定义的应用程序或对象错误实时错误'440':
对象'Show'的方法'frmmain'失败' 以下为程序片断
Sub Man()
frmflash.show
doevents
frmmain.show
unload frmflash
End Sub

解决方案 »

  1.   

    frmmain是在模块中定义的吗？没有加载模块的话会出问题。
      

  2.   

    类似问题我也遇到过，后来改了
    你试一试下面的
    Sub Man()
    frmflash.show
    doevents
    load frmmain
    frmmain.show
    unload frmflash
    可能同窗体调用的顺序有关，当时就稀里糊涂折腾过去了，还没想清什么原因
      

  3.   

    你有没有在form_load事件里卸载本身。
      

  4.   

    你试一试下面的
    Sub Man()
    frmflash.show
    doevents
    frmmain.show 1
    unload frmflash
      

  5.   

    或者：
    Sub Man()
    load frmmain
    frmflash.show 1
    doevents
    frmmain.show 1
    unload frmflash