Вызывается при активации приложения для отображения результатов поиска. ' ' Сведения о запросе активации. Protected Overrides ...

        ''' 

        ''' Вызывается при активации приложения для отображения результатов поиска.
        ''' 
        ''' Сведения о запросе активации.
        Protected Overrides Async Sub OnSearchActivated(e As Windows.ApplicationModel.Activation.SearchActivatedEventArgs)

            ' TODO: Регистрация события Windows.ApplicationModel.Search.SearchPane.GetForCurrentView().QuerySubmitted
            ' в OnWindowCreated для ускорения поиска во время выполнения приложения

            ' Если в окне еще не используется навигация по фреймам, вставьте собственный фрейм
            Dim previousContent As UIElement = Window.Current.Content
            Dim frame As Frame = TryCast(previousContent, Frame)

            ' Если приложение не содержит фрейм верхнего уровня, то, возможно, это 
            ' первый запуск приложения. Обычно этот метод и метод OnLaunched 
            ' из файла App.xaml.vb могут вызывать общий метод.
            If frame Is Nothing Then

                ' Создание фрейма, играющего роль контекста навигации, и его связывание с
                ' ключом SuspensionManager
                frame = New Frame
                Common.SuspensionManager.RegisterFrame(frame, "AppFrame")

                If e.PreviousExecutionState = ApplicationExecutionState.Terminated Then
                    ' Восстановление сохраненного состояния сеанса только при необходимости
                    Try
                        Await Common.SuspensionManager.RestoreAsync()
                    Catch ex As Common.SuspensionManagerException
                        ' Возникли ошибки при восстановлении состояния.
                        ' Предполагаем, что состояние отсутствует, и продолжаем
                    End Try
                End If
            End If

            frame.Navigate(GetType($safeitemname$), e.QueryText)
            Window.Current.Content = frame

            ' Обеспечение активности текущего окна
            Window.Current.Activate()
        End Sub