板 1- 前 次 新 ﾚｽ
[645]名無しさん(ザコ)：2005/07/05(火) 15:43:54 ID:RiX/hDZE
連書きスマン
>>642
さっきちょっと試したところ、こんな感じでVBで表示させることが出来た。
'Flashのオブジェクト
Private WithEvents SWF As VBControlExtender
Private Sub Form_Load()
'Flashのオブジェクト作成
Set SWF = Me.Controls.Add("ShockwaveFlash.ShockwaveFlash", "swfObject")
SWF.Visible = True
With SWF.object
.Movie = App.Path & "\test.swf"
.Play
End With
End Sub
'FlashのイベントをVBで受け取る
Private Sub SWF_ObjectEvent(Info As EventInfo)
MsgBox Info.Name
End Sub
外部発注ってのがなんなのか分からないけど、ShockwaveFlashオブジェクトのことなら、
それはFlash表示のためには避けられないことだと思う。
前 次
0ch BBS 2005-06-05