Hola internautas como estan, tengo una duda algo topada creo yo, lo he intentado hasta donde mis fuerzas han podido jajaja

Bueno en cuestión necesito que al llamar un evento Key_Up de un TextBox este llame a un Sub el cual debe de devolver al TextBox que lo llamo un String
Bueno esto seria facil pero yo quiero ahorrarme el trabajo simple y sencillamente poniendo la opcion keypreview del formulario y algo así
Private Sub FrmAdministracion_KeyUp(sender As Object, e As KeyEventArgs) Handles Me.KeyUp
If e.Alt = True And e.KeyCode = Keys.S Then
'Aqui deveria de ir el codigo para que el otro formulario pueda decirle ObjetoPrueba = TextBox1.text
'Pero necesito capturarlo de donde este el cursor
End If
End Sub
Public ObjetoPrueba As TextBox
Private Sub PanelSimbolos_KeyUp(sender As Object, e As KeyEventArgs) Handles Me.KeyUp
If e.KeyCode = Keys.Escape Then
Me.Dispose()
End If
End Sub
Private Sub ListViewEx1_KeyUp(sender As Object, e As KeyEventArgs) Handles ListViewEx1.KeyUp
If e.KeyCode = Keys.Enter Then
ObjetoPrueba.Text += ListViewEx1.SelectedItems(0).Tag
ElseIf e.KeyCode = Keys.Escape Then
Me.Dispose()
End If
End Sub
Espero puedan ayudarme. Gracias.