Sección de códigos , trucos y ejemplos para visual basic

438 - FsCommand de Flash en Visual Basic

Ejemplo simple enviado por John Doe, de cómo usar el evento FsCommand de Flash en Visual Basic

Las opciones :

Opción 1 = nada (vacio)
Opción 2 = Cambiar el caption del Form1
Opción 3 = Cargar Form 2
Opción 4 = mostrar un MsgBox
Opción 5 = finalizar el prorgama

Las opciones se acceden desde el menú contextual del swf, como muestra este gráfico

vista previa del menú swf en el formulario de visual basic

El código fuente del formulario es el siguiente

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ' estructura en Flash (SWF) ' fscommand ("Opción Nº1", "Opción Nº2"); ' Opción Nº1 = Command ' Opción Nº2 = args '''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Private Sub Form_Load() ' carga el archivo de flash flash.Movie = App.Path & "\Mi Menú.swf" ' lo reproduce flash.Playing = True End Sub ' evento FSCommand '''''''''''''''''''''''''''''''''''''''''' Private Sub flash_FSCommand(ByVal command As String, ByVal args As String) If args = "titulo" Then Me.Caption = "Controlar Visual Basic desde Fash Swf" If args = "cargarFrom2" Then Form2.Show If args = "Mensagepopup" Then MsgBox "MsgBox desde Flash" If command = "Finalizar" Then End End Sub

Nota. en el zip se encuentra el archivo .fla, ( está en versión flash mx 2004)

Descargar proyecto vb y archivo .fla

Enlaces relacionados

Flash y visual basic básico

Buscar en Recursos vb