Autor Tema: Agregar datos Datagridview multiplicando una columna val TextBox Visual Basic  (Leído 1008 veces)

knife85

  • Sin experiencia
  • *
  • APR2.COM
  • Mensajes: 7
    • Ver Perfil
Buenas tardes, antes que nada muchas gracias por leer e intentar ayudar, soy nuevo en el foro y en visual basic.

Tengo 3 textbox para llenar y después los agrego a un datagridview
En la cuarta columna le pido que me multiplique dos de los textbox
Hasta acá todo bien, el problema es que no me multiplica con decimales

Este es mi código, bastante simple

 valor = Val(TextBox1.Text) * Val(Precio_ventaTextBox.Text)
        DataGridView1.Rows.Add(TextBox1.Text, IdproductoTextBox.Text, Precio_ventaTextBox.Text, valor)

ejemplo1(si uso ".")

TextBox1 = 1.3

Precio_ventaTextBox= 105

valor= 136

ejemplo2 ( si uso ",")

TextBox1 = 1.3

Precio_ventaTextBox= 105

valor= 105


Y necesito que "valor" = 136,5

espero puedan ayudarme
« Última modificación: 15 de Octubre 2020, 20:18 por Ogramar »

Ogramar

  • Moderador Global
  • Experto
  • *******
  • Mensajes: 2646
    • Ver Perfil
Re:Agregar datos a un Datagridview multiplicando una columna
« Respuesta #1 en: 15 de Octubre 2020, 18:02 »
Buenas y bienvenido, léete https://aprenderaprogramar.com/foros/index.php?topic=1460.0 y no olvides poner el lenguaje con el que estés trabajando en el título y las demás cosas (fíjate en cómo pegar código, etc.).

Echale un vistazo a esto: https://aprenderaprogramar.com/index.php?option=com_content&view=article&id=203:funcion-val-con-visual-basic-convertir-texto-textbox-inputbox-en-valores-numericos-ejemplos-cu00318a&catid=37&Itemid=61

Intenta hacerlo como se indica en el ejemplo de Dim A As Single y A = Val(TextBox1.Text) a ver si así te resulta, usando una variable intermediaria.

Salu2

knife85

  • Sin experiencia
  • *
  • APR2.COM
  • Mensajes: 7
    • Ver Perfil
Re:Agregar datos a un Datagridview multiplicando una columna
« Respuesta #2 en: 15 de Octubre 2020, 19:45 »
Muchas gracias por la respuesta
ayudo a guiarme a lo que necesitaba

defini todo como Decimal en vez de Single

Dim valor As Decimal
Dim B As Decimal
        B = Val(TextBox1.Text)
Dim c As Decimal
        c = Val(Precio_ventaTextBox.Text)


        valor = B * c
        DataGridView1.Rows.Add(TextBox1.Text, IdproductoTextBox.Text, Precio_ventaTextBox.Text, valor)


Perdon por la desprolijidad, ahora me pongo a leer las reglas del foro]

Muchas gracias

 

Sobre la educación, sólo puedo decir que es el tema más importante en el que nosotros, como pueblo, debemos involucrarnos.

Abraham Lincoln (1808-1865) Presidente estadounidense.

aprenderaprogramar.com: Desde 2006 comprometidos con la didáctica y divulgación de la programación

Preguntas y respuestas

¿Cómo establecer o cambiar la imagen asociada (avatar) de usuario?
  1. Inicia sesión con tu nombre de usuario y contraseña.
  2. Pulsa en perfil --> perfil del foro
  3. Elige la imagen personalizada que quieras usar. Puedes escogerla de una galería de imágenes o subirla desde tu ordenador.
  4. En la parte final de la página pulsa el botón "cambiar perfil".