سویچ کردن به پنجره های در حال اجرا

[hadgph]

با سلام دوستان
من یه برنامه نوشته ام که با فایل اکسل کار می کنه، وقتی می خوام فایل رو ذخیره کنم ، اکسل یه پیغام میده و برنامه قفل می کنه، ولی پنجره این پیغام رو زیر برنامه قرار میده :گریه: .
میخوام از داخل برنامه به پنجره این پیغام سویچ کنم، مثل کاری که می شه از طریق تسک منیجر ویندوز کرد ولی هر چی گشتم نتونستم راه حلی پیدا کنم

اگه راه حلی دارین خیلی ممنون می شم بگین، خواهشا کمک کنید:قلب:

[younes221]

سلام ، یک روش اینه که Handle پنجره خطا رو بدست بیاری و سپس از طریق تابع سیستمی BringWindowToTop بیاریش بالا .

واسشون خیلی مثال هست داخل گوگل جستجو کن.

[hadgph]

ممنون younes221 ،ولی این روش جواب نداد
کدی که استفاده کردم مشابه این بود:

Dim THandle As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function BringWindowToTop Lib "user32" (ByVal hwnd As Long) As Long

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
THandle = FindWindow(vbNullString, "Microsoft Office Execel - Compatibility Checker")
BringWindowToTop(THandle)
End Sub


شاید اشکال از کد من باشه، و شاید هم به خاطر این باشه که پنجره خطا در تسک بار ظاهر نمیشه!!