和图像浏览器一起做的,感觉挺实用的,而且也比较简单,拿出来给大家瞧瞧(附源码)

用不了呀

你的这个程序还是有问题呀
怎么带开了用不了

Private Sub Command1_Click()
skFlash1.Play
End Sub

Private Sub Command2_Click()
skFlash1.Stop
End Sub

Private Sub Command3_Click()
skFlash1.Rewind
skFlash1.Play
End Sub

Private Sub Command4_Click()
cmdlg1.ShowOpen
skFlash1.Movie = cmdlg1.FileName
End Sub

Private Sub Command5_Click()
Unload Me
End Sub

只能说没意思..