很简单!在form中加一个Timer控件,可以500毫秒执行一次
'全局变量
private GblFlashIsFinish as boolenPrivate Sub Timer1_Timer()
if MyFlash.FrameNum = myShockwaveFlash.TotalFrames - 1 Then
GblFlashIsFinish=true
end if
end sub
'全局变量
private GblFlashIsFinish as boolenPrivate Sub Timer1_Timer()
if MyFlash.FrameNum = myShockwaveFlash.TotalFrames - 1 Then
GblFlashIsFinish=true
end if
end sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货