تنشيط شاشة بواسطة الفيجوال

هناك طريقة في System.Windows.Forms namespace اسمها sendkeys..

هذه الطريقة تقوم بارسال (أو بمحاكاة ضغط الازرار) لشاشة البرنامج النشيط حالياً..

استخدمها دائماً عندما أريد التعامل مع برنامج اخر من برنامجي..

هناك طريقة اخرى لا استخدمها (لأني لا اعرفها :D) و هي الحصول على مقبض الشاشة النشيط handle ثم التعامل معه..

هل لي بمثال على هذا الكود لو سمحت؟

        'open the notepad
        Process.Start("notepad.exe")
        'sleep for 3 seconds to ensure that notepad has been launched
        Threading.Thread.CurrentThread.Sleep(3000)
        'instantiate an object
        Dim s As Windows.Forms.SendKeys
        'now, send the keys
        s.SendWait("ahmed")