Agregar datos Datagridview multiplicando una columna val TextBox Visual Basic

[knife85]

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

[Ogramar]

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]

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