VB工程--百例86--播放flash动画.

此题的唯一难点就是加载swf动画，路径。

Option Explicit

Private Sub Command1_Click(Index As Integer)
Select Case Index '以命令按钮的索引值作为测试表达式
Case 0
Flash1.Movie = "D:软件文件夹2大型软件VB学习百例百例源文件实例86实例素材wg.swf"
'加载一个文件swf文件的动画
Flash1.Play
'播放动画
Case 1
End
End Select

End Sub

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!