gistfile1.vb

    Private Sub WindowCommandReload_Click(sender As Object, e As RoutedEventArgs) Handles WindowCommandReload.Click
        myUserControlEE.AxShockwaveFlashEE.Dispose()
        myUserControlEE.AxShockwaveFlashEE = New AxShockwaveFlashObjects.AxShockwaveFlash With {
            .Parent = myUserControlEE,
            .Dock = Forms.DockStyle.Fill,
            .AllowFullScreen = "true"
        }
        myUserControlEE.AxShockwaveFlashEE.AllowScriptAccess = "true"
        myUserControlEE.AxShockwaveFlashEE.FlashVars = "roomname_url=PWX6IHxR1ibEI"
        myUserControlEE.AxShockwaveFlashEE.Movie = "http://r.playerio.com/r/everybody-edits-su9rn58o40itdbnw69plyw/freegame.swf"
    End Sub