利用 FindWindow API 找到特定標題視窗,卻無法將其帶到前景?

Question

我用 FindWindow API 找到特定標題視窗

卻無法將其帶到前景,程式碼如下,是哪裡弄錯了嗎?

請前輩指點一下,謝謝喔!

(經查 ShowWindow 回傳 0
SetForegroundWindow 回傳非0)

         Dim handle As IntPtr = FindWindow(vbNullString, "未命名 - 記事本")
         If Not IntPtr.Zero.Equals(handle) Then
                'MsgBox(handle.ToInt32)
                Dim r As Integer
                r = ShowWindow(handle, SW_RESTORE)
                'MsgBox(r)
                r = SetForegroundWindow(handle)
                'MsgBox(r)
          End If

 

API宣告如下

Const SW_RESTORE=9

<System.Runtime.InteropServices.DllImport("user32.dll", _
    EntryPoint:="SetForegroundWindow", _
    CallingConvention:=Runtime.InteropServices.CallingConvention.StdCall, _
    CharSet:=Runtime.InteropServices.CharSet.Unicode, SetLastError:=True)> _
    Public Shared Function SetForegroundWindow(ByVal handle As IntPtr) As Integer

    End Function

    <System.Runtime.InteropServices.DllImport("user32.dll", _
    EntryPoint:="ShowWindow", _
    CallingConvention:=Runtime.InteropServices.CallingConvention.StdCall, _
    CharSet:=Runtime.InteropServices.CharSet.Unicode, SetLastError:=True)> _
    Public Shared Function ShowWindow(ByVal handle As IntPtr, ByVal mode As APIWindowMode) As Integer

    End Function

 

Answer 1

您好：

      建議您可以參考下述文章：

http://forums.microsoft.com/msdn-cht/ShowPost.aspx?PostID=380373&SiteID=14

http://www.it130.net/VB/57731.htm

Answer 2

我知道了

我是用同一隻程式在測試

所以我以為應該抓到的就是 previous instance

結果 FindWindow 忘了排除自己

所以每次都抓到 current instance

現在問題解決了,感謝大大的指點