如何在通话后清除SendKeys

Question

这是关闭PhotoShop对话框的代码：

For Each p As Process In Process.GetProcessesByName("PhotoShop")

     AppActivate(p.Id)

     Threading.Thread.Sleep(3000)
     My.Computer.Keyboard.SendKeys("{ESC}")
     Threading.Thread.Sleep(1000)
     Exit For

Next p

程序完成后，将显示以下对话框：

 MessageBox.Show(Me, "OK", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Information)

我正在使用远程桌面在另一台PC上执行我的程序。

如果我打开远程桌面并等待Process完成，则会显示“确定”对话框。

然后我在应用程序完成之前执行我的程序并关闭远程桌面。

我的程序完成后，我再次重新打开远程桌面，关闭“OK”对话框。

我认为在重新加载屏幕时会调用事件调用“ESC”。 事件SendKeys有多清楚？