Visual Basic.NET - Extraer datos variable

 
Vista:
sin imagen de perfil
Val: 2
Ha aumentado su posición en 24 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Extraer datos variable

Publicado por Carlos (73 intervenciones) el 05/06/2021 06:21:05
Soy nuevo con variables y me gustaria saber si alguien me puede guiar, tengo un proyecto para sacar unos datos de una variables de tipo texto:

Dim valor As String = "Kilos_Patatas 75kls Kilos_Cebollas 25kls Kilos_Platanos 80kls"

Pues me gustaria extraer el resultado de cada producto en un datagrid:

Resultado deberia salir asi "75kls" "25kls" "80kls"

Decir que la variable "valor" podrian salir mas de 3 productos como puse en el ejemplo

Espero una respuestas de ustedes y me puedan ayudar, Saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Phil Rob
Val: 3.353
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Extraer datos variable

Publicado por Phil Rob (1546 intervenciones) el 05/06/2021 08:42:02
Hola,

Veo que cado peso es precedido por un carácter blanco y comienza con un carácter cifra.
Quizá que este código puede te ayudar :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
 
    Dim valor As String = "Kilos_Patatas 75kls Kilos_Cebollas 25kls Kilos_Platanos 80kls"
 
    Dim Separador As Char() = {" "}
    Dim Datos() As String
 
    Datos = valor.Split(Separador)
 
    For i As Integer = 0 To Datos.Count - 1
        If Datos(i).Substring(0, 1) >= "0"c And Datos(i).Substring(0, 1) <= "9"c Then
            MessageBox.Show("Encontrado " & Datos(i))
        End If
    Next
 
End Sub

...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
sin imagen de perfil
Val: 2
Ha aumentado su posición en 24 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Extraer datos variable

Publicado por Carlos (73 intervenciones) el 06/06/2021 01:29:19
Es de agradecer la respuesta, pero se me quedo decir que deberia clasificar el titulo y el resultado y no siempre es cifra, pongo otro ejemplo:

Dim valor As String = "Kilos_Patatas 75kls Kilos_Cebollas 25kls Kilos_Platanos 80kls Empresa_1 Mariano"

Me deberia de extraer por separado:

Resultado A deberia salir asi "Kilos_Patatas" "Kilos_Cebollas" "Kilos_Platanos" "Empresa_1"

Resultado B deberia salir asi "75kls" "25kls" "80kls" "Mariano"

Perdon por no especificar el Resultado A es de agradecer la ayuda, saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Phil Rob
Val: 3.353
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Extraer datos variable

Publicado por Phil Rob (1546 intervenciones) el 06/06/2021 08:47:14
Hola,

Este es fácil si es siempre Titulo / Valor.
En este caso, los indicios pares muestran los títulos y los indicios impares muestran los valores.

1
2
3
4
5
6
7
8
9
10
11
12
Dim valor As String = "Kilos_Patatas 75kls Kilos_Cebollas 25kls Kilos_Platanos 80kls Empresa_1 Mariano Fecha Hoy"
 
Dim Separador As Char() = {" "}
Dim Datos() As String
 
Datos = valor.Split(Separador)
 
    Dim i As Integer = 0
    While i < Datos.Count
        MessageBox.Show("Encontrado " & Datos(i) & " = " & Datos(i + 1))
        i += 2
    End While

Siempre la cadena valor debe ser escrita de misma manera : siempre pares Titulo Valor y el separador es un solo carácter blanco.

Espero que este te ayudará ...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 2
Ha aumentado su posición en 24 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Extraer datos variable

Publicado por Carlos (73 intervenciones) el 06/06/2021 17:26:29
Me sirvo de mucha ayuda gracias brooo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar