Private Function getWindowHandle() As Integer
        For Each p As Process In System.Diagnostics.Process.GetProcessesByName( _
          Process.GetCurrentProcess.ProcessName)
            If p.Id <> Process.GetCurrentProcess.Id AndAlso _
            p.MainWindowTitle = "Destination" Then
                Return p.MainWindowHandle.ToInt32
            End If
        Next
        Return -1
    End Function