Resultado de la búsqueda: If IsNumeric(Text2.Text) Then