谁能告诉我,怎样在vb中插入动画

来源:百度知道 编辑:UC知道 时间:2024/06/15 09:54:26
能具体说一下步骤吗谢谢 ,还是不会,代码加在哪儿,我直接加在窗口代码中,显示有错误
App.Path是什么意思,还有动画是不是可以使。gif类型的。呵呵不好意思谢谢啦
我把shockwave flash控件加到窗口上以后在属性窗口中并没有放置动画的地方,还有就是代码老出错

添加【ShockWave Flash】控件。(ctrl+t)

详细代码:

1.播放:

    ShockwaveFlash1.Movie = App.Path & "\ball.swf"

    '读取同一目录下的Flash动画文件

    ShockwaveFlash1.Play

2.暂停:

        ShockwaveFlash1.Playing = False

3.继续:

        ShockwaveFlash1.Playing = True 

例子:

Private Sub Command1_Click()

    ShockwaveFlash1.Movie = App.Path & "\ball.swf"

    '读取同一目录下的Flash动画文件

    ShockwaveFlash1.Play

    Command1.Enabled = False

End Sub

Private Sub Command2_Click()

    If Command2.Caption = "暂停" Then

&