Visual Basic.NET - ayuda con sendkey en visual.net

hola

he buscado y buscado y todavia no doy con la solucion a mi problema.
desde visual programe para que se abriera un aplicacion pero quiero que una vez abierta esta aplicacion darle un enter (la apliacion al abrirla trae un ACERCA DE y es necesario aceptar para poder trabajar en el).
he investigado y con SendKeys.Send("{ENTER}") se puede pasar un comando a la aplicacion pero tirra el siguiente error

No se puede ejecutar SendKeys dentro de esta aplicación porque ésta no controla los mensajes de Windows. Puede cambiar la aplicación para que controle mensajes o utilizar el método SendKeys.SendWait.

agregue ese import : Imports System.Windows.Forms

porfavor si alguien sabe algo agradeceria muhisimo su ayuda

Hola, haber si entendi, lo que estas tratando de hacer.

Primero al formulario Principal o sobre el cual vas presionar enter....!
habilita la propiedad

KeyPreview = True

Private Sub FrmPrincipal_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
Try
Dim frm As New Form3 'Formulario acerca de
If e.KeyChar = ChrW(Keys.Enter) Then
frm.ShowDialog()
End If
Catch ex As Exception
End Try
End Sub

Ojala te ayude....!

no se como hacer para ke mi plantilla principal se mantenga visible mientras ke uso una de sus herramientas .. maximizadamente osea ... es como si fuera un documento de word .... si tengo una hoja maximizada ... luego la cierro ... no se cierra todo si no solo la hoja ....
responde pz ... gracias

Tienes que usar las funciones del API:

Private Declare Function FindWindow Lib "user32" Alias"FindWindowA" (ByVal lpClassName as string, ByVal lpWindowName as String) As integer
Private Declare Function sForegroudWindow Lib "user32" Alias "SetForegroudWindow" (Byval hwnd As Integer) As Integer

Sub SendKeysToApplication(ByVal appTitle As String, ByVal keys as String)
'Encontrar la aplicación
dim hWnd As integer=FindWindow(Nothing,appTitle)
'Salir si no se encuentra
if hWnd <=0 then
messageBox.Show("Aplicación no encontrada)
exit sub
end if

'Convertirla en aplicación activa.
SetForeground(hWnd)
'Enviar las teclas y esperar.
SendKeys.Sendwait(keys)
End sub

ej.

SendKeysToApplication("Sin título - Bloc de notas","VB~")