none
sacar numeros de un texto por separados RRS feed

  • Pregunta

  • Buenas alguien me puede orientar como puedo sacar estos numero por separado de este texto 21 - 24 %

    quiero sacar 21 y despues 24 

    gracias

    sábado, 17 de octubre de 2015 6:05

Respuestas

  • Imports System.Text.RegularExpressions
    
    Module Module1
    
        Sub Main()
            Dim texto = "21 - 24 %"
            Dim mc As MatchCollection = Regex.Matches(texto, "(\d+)+")
    
            Dim a As Integer = CInt(mc.Item(0).Value)
            Dim b As Integer = CInt(mc.Item(1).Value)
    
            Console.WriteLine("{0} {1}", a, b)
            Console.WriteLine("-----")
    
            texto = "432 654 kjdsfkjhu 543 32 %% 87 %"
            mc = Regex.Matches(texto, "(\d+)+")
            For Each num As Match In mc
                Console.WriteLine(num.Value)
            Next
    
            Console.ReadKey()
        End Sub
    
    End Module
    


    • Editado AlterEgo 22 sábado, 17 de octubre de 2015 12:26
    • Marcado como respuesta JETET domingo, 18 de octubre de 2015 15:59
    sábado, 17 de octubre de 2015 12:23

Todas las respuestas

  • Podrias mostrar tus intentos para que te podamos guiar mejor.

    1. En que lenguaje es.

    2. ¿Qué tan nuevo eres programando?

    Saludos.

    sábado, 17 de octubre de 2015 10:00
  • Imports System.Text.RegularExpressions
    
    Module Module1
    
        Sub Main()
            Dim texto = "21 - 24 %"
            Dim mc As MatchCollection = Regex.Matches(texto, "(\d+)+")
    
            Dim a As Integer = CInt(mc.Item(0).Value)
            Dim b As Integer = CInt(mc.Item(1).Value)
    
            Console.WriteLine("{0} {1}", a, b)
            Console.WriteLine("-----")
    
            texto = "432 654 kjdsfkjhu 543 32 %% 87 %"
            mc = Regex.Matches(texto, "(\d+)+")
            For Each num As Match In mc
                Console.WriteLine(num.Value)
            Next
    
            Console.ReadKey()
        End Sub
    
    End Module
    


    • Editado AlterEgo 22 sábado, 17 de octubre de 2015 12:26
    • Marcado como respuesta JETET domingo, 18 de octubre de 2015 15:59
    sábado, 17 de octubre de 2015 12:23