shockwaveflash1.movie解决办法

shockwaveflash1.movie
vb通过控件调用SWF，
shockwaveflash1.movie="xxx.swf"
如果判断是否加载成功？
如：xxx.swf文件不存在时。

别说用我的眼看动画是否显示。。
我要的是代码判断。。。
[解决办法]