none
Error de conversión de cadena a tipo decimal RRS feed

  • Pregunta

  • Hola a todos.

    Estoy tratando de realizar un bucle y me está indicando que la conversión de cadena a tipo decimal no es válida.

    If rdbTamVentas.Checked = True Then If VarGlobal.ValorDivisor = 1 Then For i As Integer = 0 To 11 Yval(i) = Cdec(String.Format("txtTAM{0}", i + 1)) / VarGlobal.DivisorGrafico Next ......... else

    .......

    Las variables ValorDivisor y Yval son de tipo decimal. Los campos de texto son txtTAM1.Text, txtTAM2.text,....

    He probado varias cosas pero me da error en la conversión. Ya no se como ponerlo para que funcione.

    Bueno, muchas gracias a todos.

    Un saludo.

    Gemma

    viernes, 11 de enero de 2019 8:47

Respuestas

  • Hola, estás intentando convertir la siguiente cadena a decimal

    txtTAM1, txtTAM2.....

    Supongo que lo que requieres es recuperar el Texto de un control txtTAM1.Text, txtTAM2.Text etc....

     If rdbTamVentas.Checked = True Then
    	If VarGlobal.ValorDivisor = 1 Then
    		For i As Integer = 0 To 11
    			Dim textBox = TryCast(Me.Controls.Find("txtTAM" & ( i + 1), True).FirstOrDefault(), TextBox)
    			If textBox IsNot Nothing Then
    				Yval(i) = Cdec(textBox.Text) / VarGlobal.DivisorGrafico
    			Endif 
    		Next
    .........
      else 
    .......            


    Si se solucionó tu consulta no olvides marcar la respuesta. Si te ayudó, vótala como útil. Saludos

    • Marcado como respuesta gemma_campillo viernes, 11 de enero de 2019 10:04
    viernes, 11 de enero de 2019 9:54

Todas las respuestas

  • Hola, estás intentando convertir la siguiente cadena a decimal

    txtTAM1, txtTAM2.....

    Supongo que lo que requieres es recuperar el Texto de un control txtTAM1.Text, txtTAM2.Text etc....

     If rdbTamVentas.Checked = True Then
    	If VarGlobal.ValorDivisor = 1 Then
    		For i As Integer = 0 To 11
    			Dim textBox = TryCast(Me.Controls.Find("txtTAM" & ( i + 1), True).FirstOrDefault(), TextBox)
    			If textBox IsNot Nothing Then
    				Yval(i) = Cdec(textBox.Text) / VarGlobal.DivisorGrafico
    			Endif 
    		Next
    .........
      else 
    .......            


    Si se solucionó tu consulta no olvides marcar la respuesta. Si te ayudó, vótala como útil. Saludos

    • Marcado como respuesta gemma_campillo viernes, 11 de enero de 2019 10:04
    viernes, 11 de enero de 2019 9:54
  • Hola querido Sergio:

    Fantástica, eso era lo que necesitaba. Claro, ahora ya me coge los valores de los text perfectamente, lo he ido comprobando y así es.

    Querido amigo, muchísimas gracias por tu inestimable ayuda.

    Un beso.

    Gemma.

    viernes, 11 de enero de 2019 10:02