Paso 8: Actualización: 13/05/2015
Aquí está el código para abrir un archivo desde el menú:
Dim ofd como OpenFileDialog OpenFileDialog nuevo de =
Si ofd. ShowDialog = Windows.Forms.DialogResult.OK entonces
Dim swfFile As String = ofd. Nombre de archivo
AxShockwaveFlash1.LoadMovie (0, swfFile)
AxShockwaveFlash1.Play()
End If
Recuerda votar por favor!