我想用animation 控件播放动画5次后停下,然后触发其他事件,可我不知道如何可以判断出animation 播放动画5次后已经停下了,请高手指点!Private Sub Form_Load()
Animation1.Open "E:\ywhis_new\系统代码\电子邮件系统\图片\邮件.avi"
Animation1.Play 5End Sub
Animation1.Open "E:\ywhis_new\系统代码\电子邮件系统\图片\邮件.avi"
Animation1.Play 5End Sub
看看行不行
Private Sub Form_Load()
static i as integer
Animation1.Open "E:\ywhis_new\系统代码\电子邮件系统\图片\邮件.avi"
if i =5 then
msgbox "5次"
else
i=i+1
Animation1.Play 5
end if
End Sub
Animation1.Play
Animation1.Play
Animation1.Play
Animation1.Play
'播放五遍
'哈哈:)