Hola a todos, en el evento KeyPress de un TextBox tengo el siguiente codigo
e.Handled = Numeros(Me.TB_ID.Text, e.KeyChar, False) 'Funcion que valida solo números enteros
If Not Me.TB_ID.Text = "" And e.KeyChar = Chr(13) Then
IdBindingSource.Filter = "ID = " & Me.TB_ID.Text
Else
If Me.TB_ID.Text = "" And e.KeyChar = Chr(13) Then
Tablas.Show()
End If
End If
End Sub
Este codigo funciona perfectamente, cuando el TextBox esta vacío me abre el formulario Tablas y cuando coloco un valor numerico me filtra todo el formulario, hasta aca todo perfecto. Ahora lo que necesito es que me tire un MsgBox para que cuando no se encuentre ningun registro con el número ingresado (No se puede filtrar el formulario) me devuelva el MsgBox con el aviso, pero no se como adaptarlo al codigo que les pase. Necesitaría que alguien me lo pueda adaptar de tal manera que siga funcionando todo lo anterior.
Muchas gracias
