注册 登录
编程论坛 VB6论坛

求助如何清除载入的flash文件

laokafei 发布于 2020-05-26 19:00, 1525 次点击
请教各位高手,我在VB中使用FLASH控件载入动画文件正常,但载入后就不再消失,再次调用其他文件时不能正常载入,请教如何清空载入的flash文件,谢谢!
只有本站会员才能查看附件,请 登录



代码如下:
Option Explicit
Dim dh As String

Private Sub Command1_Click()
dh = Text1.Text
Flash.Movie = App.Path + "\flash\" + dh + ".swf"    '要播放的Swf文件路径
Flash.Playing = True
End Sub

Private Sub Form_Load()
End Sub

[此贴子已经被作者于2020-5-26 19:02编辑过]

1 回复
#2
laokafei2020-05-27 10:15
解决了,调整参数就好。
EmbedMovie (读写)
语法:EmbedMovie As Boolean
说明:影片是否被存贮到控件所在的容器中。当你已载入一个影片后将该属性设为 True,播放影片时就不必再去读 SWF 文件了。这使得在PowerPoint 简报或 VB程序里使用 Flash 影片更容易。但将该属性设为 True 后,控件的 Movie 属性就不再接受新的值了。要想播放另一个影片(给Movie 属性赋新值),必须先将 EmbedMovie 属性设为 False 。
例子 :
movie.EmbedMovie = True
1