کمک در رابطه با اشیای MCI

[littledemon]

:گریه: با سلام به کلیه اعضای محترم !
من می خواهم با استفاده از کنترل MCI یا همان Microsoft multimedia control کاری کنم که
وقتی یک صوت را اجرا می کنم .اگر به فلان فریم خاصی از آن صوت رسید ، برنامه به فرم دیگری
برود.
ممنون می شوم اگر به من کمک کنید! با تشکر قبلی...

[mahdi_farhani]

این کد به کارت میاد


Private Sub Form_Load()
MMControl1.UpdateInterval = 1
End Sub

Private Sub MMControl1_StatusUpdate()
If MMControl1.Position >= 50000 Then
MMControl1.Command = "Stop"
End If
End Sub